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The Rockwell AIM-65 

For professional learning, designing and work, Rockwell's AIM-65 

microcomputer gives you an easy, inexpensive headstart! The AIM'S 

full-size keyboard, true alpha-numeric display and on-board printer 

give you all of the peripherals associated with a large development 

system, yet AIM is priced lower than the first circuit board would cost 

for such a system. 

4K AIM-65 $515.00 

AIM Enclosure $43.50 

Protects the AIM 65 from damage while maintaining convenient 

access to on-board switches and printer. 

Power Supply for the AIM 65 by MTU $79.95 

This power supply from Micro Technology Unlimited provides the 
power and cooling capacity needed to run your AIM at peak efficiency. 

AIM BASIC ROM $100.00 

Written by microsoft, Rockwell AIM-65 8K BASIC is contained in two 

easy-to-install ROM circuits. 

AIM-65 Assembler ROM $85.00 

Just plug it into the AIM 65 board and your AIM is ready to do all the 

busy work of creating 6502 Machine-Language programs. 

CompuMart's Complete AIM-65 System. $850.00 

Save $28 

Includes a 4K AIM 65 with BASIC and Assembler, an MTU power 
supply, Sanyo tape recorder and enclosure. 

Rockwell Motherboard for the AIM $195.00 

Want to expand your AIM and keep Rockwell quality? Purchase the 

Motherboard from CompuMart. 
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KIM- 1 Microcomputer "^J $179.00 

From MOS Technology, a division of Commodore. This famous sin- 
gle board based computer comes to you fully assembled and tested - 
simply attach a power supply and you're ready to start computing. 
Includes three informative manuals FREE. 
Micro Technology Power Supply $35.00 

The perfect mate for a small KIM system. Comes fully assembled, 
tested, and enclosed in a Bakelite Box. 

KIM 1 with power supply $204.00 

Save S10 when purchased together! 

KIM Enclosure $23.50 

Give your KIM-1 a professional appearance and protect it from shorts 
and physical damage. 

Current Loop/IRS-232 Adaptor $24.50 

For general interfacing applications. (KIM-1 to printer, KIM-1 to 
modem, etc.) 

Sanyo Cassette Recorder $ 5 5 .00 

Perfect for your KIM. Works great. 

Books on KIM. (The following three books are included FREE 
when you buy a KIM. You may purchase them separately however). 
6502 Programming Manual $9.95 

6502 Hardware Manual $9.95 

KIM User Manual $9.95 

First Book of KIM $8.95 





Buy direct from CompuMart and get more than you pay for. 

COMPUMAHTcAMBRDGE MA 02142 



270 THIRD STREET, 

Toll Free 1-800-343-5504 




Write Dept. 317 for 
Free Catalog 



In Mass. 61 7-491 -2700 
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Sams has three books written especially tor the popular 6502-based 
microcomputers like the APPLE, PET, ATARI, OSI, SYM, AIM and KIM, If you 
own a 6502-based computer— or are thinking about buying one— let 
Sams help you get the most out of it. We make graphics, programming, 
interfacing and software design simple. 

■ PROGRAMMING & INTERFACING THE 6502, WITH EXPERIMENTS. 

By Marvin De Jong. The more you know about programming and inter- 
facing, the more performance you can get out of your microcomputer. 
This hands-on guide to 6502 presents 80 carefully graded experiments 
to help you get the most out of your AIM, KIM or SYM. NO. 21651. $ 13.95 

■ 6502 SOFTWARE DESIGN 

Leo Scanlon— a leading computer expert— simplifies software design. 
Takes you from fundamentals into more complex topics. Get more ver- 
satility out of your computer by learning to program it yourself. IN- 
CLUDES 89 TEST PROGRAMS! NO. 21656. $ 1 0.50 

■ COMPUTER GRAPHICS PRIMER 

Mitchell Waite— one of the most popular computer authors— brings 
computer graphics into sharp focus. Shows you how to use a 6502- 
based computer to create complex drawings, plans, maps and 
schematics on a video screen. NO. 21650. $ 1 2.95 
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The Editor's Notes 

IMPORTANT 
ANNOUNCEMENT! 

COMPUTE and compute II are merging into one, high quality, 
monthly magazine. 

This is the last issue of compute II. Your next magazine, 
COMPUTE!, will arrive in November. 

The Timetable 

The merger is effective with the November/ December issue of 
COMPUTE! In January, we're monthly! Each month you'll 
receive the same quality of single board information we've 
been providing in compute II. 

Don't Despair! 

New COMPUTE! will contain a healthy Single-Board Computer 
Gazette, continuing to provide you with useful, up-to-date 
information. We're committed to continuing to provide as 
much or more information in two monthly issues as we've 
been providing in one bimonthly issue. 

OSI Moves Out 

New COMPUTE! will have an OSI Gazette for you OSI 
owners, with the Single-Board Computer Gazette devoting its 
space to KIM, SYM and AIM. 

And What About the 1802? 

Dann McCreary will continue his column, emphasizing the 
areas of communication between the 6502 and the 1802. 

That's the new COMPUTE! Your subscription will be adjusted to 
make sure you get your six issues of computel l/COMPUTE! 

We'll explain the process in Issue 7 of COMPUTE! (November/ 
December: the copy you'll receive next time.) 
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Here's how to cross pollinate your own system: 



Well, I finally did it. Got myself an APPLE II to play 
with. No, I'm not abandoning KIM. Just wanted to 
see what all the hullaballoo was about. 

Sure is easier to demonstrate than KIM. Who 
wants to see an assembler when they can see some 
neat video-arcade like games in action? 

...And Ever The Twain Shall Meet 

While I was preparing to take an AIM 65 system to 
the local computer club for a demo, it became painfully 
obvious that I would either have to build a special 
version of the sound generator board for my AIM 
65/MTU system or, somehow, adapt the sound board 
that was built for my KIM-1/HDE system. I decided 
to adapt rather than fight with a new board from the 
ground up. Luckily, in my MTU card cage, the 
bottom row of slots are not used because of the way 
the MTU backplane board has been raised to accomo- 
date the AIM 65. Also, the spacing between the 
card guide on the right hand side of the cage and 
the edge connector turned out to be just perfect for 
supporting the 4.5"x6.0" HDE size card. It was 
almost like the cage was designed to accomodate the 
standard 4.5"x6.0" size prototyping cards. (Keep 
this in mind when you need a quick and cheap proto 
board in your MTU system as they can be obtained 
for less than $10). 

Interestingly, a week later, I needed to adapt an 
MTU card (the Visible Memory graphics board) to 
my KIM-1/HDE system. Because of the size of the 
Visible Memory card it had to be mounted outside 
the HDE cage. A cheap 4.5"x6.0" proto board was 
installed in the HDE system with ribbon cable to 
extend the bus out to a 44-pin card edge connector 
which plugged on to the MTU card. 

Both transplants are doing fine, thank you. And, 
on nights off from doing serious development work, 
big KIM can relax with some pleasing graphics as 
well as some interesting sound effects. 
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Signal Conversion Table 

Sound Chip Driver 

As promised, here is the low level driver software for 
interfacing a 6522 VIA to the General Instruments 
AY3-8910 Programmable Sound Generator (PSG). 
The explosion routine is included to satisfy yourself 
that the interface works correctly. The clock circuit 
was duplicated from page 33 of the PSG manual. 

The 1 MHZ system clock (01 or 02) could have 
been used to save a few dollars but then all example 
values given in the documentation would have to be 
recalculated. Building the suggested clock input circui- 
try seemed to be the easier of the two alternatives 
since I had the parts on hand anyway. 

The audio output circuitry was duplicated from 
page 6 of the PSG manual and used to feed one 
of the cheap (under $10) Radio Shack speaker/ 
amplifiers. 

Connections from the 6522 to the PSG are similar 
to the scheme presented on page 43 of the PSG 
manual except that BC2 (pin 28) is connected to 
+ 5 volts (not PB1), and BDIR (pin 27) is connected 
to PB1 (not PB2). 

This way, three additional PSG chips can be 
connected to the 6522 as my drawing indicated in 
issue #3 of COMPUTE (page 104). 

I should mention that there was one thing 
about the PSG manual that really messed me up 
for awhile. All the register numbers and values are 
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expressed in octal! Once I realized this, programming 
the chip went much easier. 

OK. I've shown you how to hook up this neat 
chip and even threw in some software to get you 
going. 



What kinds of interesting sounds can you come up 
with? Can you program wind chimes or bells? I'll 
publish any neat sound programs. 
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9 SOUND CHIP 
J WRITTEN BY 



DRIVER PROGRAM 
ERIC C« REHNKE 



P6522 DEFINITIONS 

I DBASE ■ 



$0810 



ORB 

DDRB 

DORA 

OR EG A 



■X0BASE 
■I0BA8E+2 

<[0BASE+3 
=IGBASE+15 



9 KIM HEX TO ASCII ROUTINE 



PRTBYT «*1E3B 
CRLF =*1E2F 
OUTSP **1E9E 

STBUF ==$2500 
9 MAINLINE ROUTINE 
#=:*20©0 



P******0UTPUT TO THE SOUND CHIP****** 

5 IN ORDER TO SET A SOUND CHIP REGISTER TO 

PA PARTICULAR VALUE* ENTER THIS ROUTINE WITH 

J THE 'X' REGISTER CONTAINING THE SOUND CHIP 

? REGISTER NUMBER AND THE ACCUMULATOR CONTAINING 

J THE DATA TO BE LOADED INTO THAT REGISTER. 

? 

OUTPUT TAY rSAVE DATA 

JSR LATCH 

JSR WRITE 



P******INPUT FROM THE SOUND CHIP****** 
JIN ORDER TO READ THE CONTENTS OF A 
'PARTICULAR SOUND CHIP REGISTER! ENTER 
PTHIS ROUTINE WITH THE SOUND CHIP REGISTER 
9 NUMBER IN THE 'X' REGISTER. UPON RETURN* 
J THE DESIRED REGISTER DATA WILL BE FOUND 
PIN THE ACCUMULATOR 



INPUT 



JSR LATCH 
JSR READ 
TYA 
RTS 



9 RESTORE DATA 



'LATCH' ROUTINE SIMPLY LATCHES 
SOUND 



} Tl- 

PTHE SOUND CHIP 
PTHE SOUND CHIP 



REGISTER NUMBER INTO 
ADDRESS REGISTER FOR 



PA SUBSEQUENT READ OR WRITE. 



LATCH 



08 
08 



I... DA 
STA 
STA 



#*FF 
DDR A 
DDRB 



PMAKE IT ALL OUTPUTS 
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BOX 120 

ALLAMUCHY, N.J. 07820 

201-362-6574 



HUDSON DIGITAL ELECTRONICS INC 



ANNOUNCING THREE NEW PRODUCTS 



1 . 4/8K EPROM CARD 

A 4/8K EPROM card, featuring on-board 
jumper selection of 2708 or 27 1 6 EPROMS. 
Compact, industry standard 4 1 /2 x 6V2" card 
size with on board regulation of all required 
voltages. Uses the KIM-4 standard 44-pin 
bus. (EPROMS not included) 
HDE DM 816-P8 — $165.00 




DM 816-P8 - (EPROMS not included) 

2. HDE DISK BASIC (Now it's KIM's turn) 

H DE Disk Basic has been designed so that the 6502 Basic versions for SYM , Kl M , Tl M and Al M are 
subsets, thereby allowing program transfers without any modification in most instances. For 
program development we've included and enhanced the editing features available in our text editor 
TED. Other facilities include: ON ERROR GOTO . . .; IF . . .THEN . . . ELSE; LINE INPUT; PRINT USING; 
AUTO line numbering; renumbering; hex value input and much more. Disk capabilities include: SAVE. 
LOAD, RUN, LINK, CHAIN and sequential and random input/output. KIM version available nowfor 
HDE Disk based systems — $175.00 

3. HDE 'AID' -An Advanced Interactive Disassembler 

The Advanced Interactive Disassembler, designed by PCS, Progressive Computer Software, is a 
resident, two pass disassembler that creates TED compatible source files, with labels assigned to all 
address references. Addresses external to the object file limits are defined as equates in the source. 

AID Builds Source Files for All Your Object Programs 

The creation of source files of any object program is limited only by the size of the object program, 
the symbol table and the user defined source file buffer. AID will save interim source files to disk. 
KIM, TIM, SYM and AIM HDE Disk Based versions - $95.00 
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HDE DISK USER LIBRARY 



The H DE Disk User Library has been established for the exchange of user developed programs and 
routines. All programs in the library are 'public domain' and available to any HDE Disk System user 
for a nominal copying charge or on a one-for-one free exchange basis. A list of programs currently 
available and other information may be obtained from Progressive Computer Software, 405 Corbin 
Road, York, PA 17403. Enclose a self addressed, stamped envelope for a prompt reply. 



OTHER HDE PRODUCTS INCLUDE; 

• 5" and 8" single and dual drive disk systems 

• 1 9" RETMA standard card cage 

• 8K static RAM memory 

• Prototyping card 



HDE Assembler 

Text Output Processing System 
Comprehensive Memory Test 
Dynamic Debugging Tool 
(disk and cassette versions) 



COMING SOON: 




A KIM based, dual 
mini drive system 
for: 

• Program development 

• Engineering support 

• Word processing 
applications 



Disk FORTH 



Dual Channel RS-232C 
Communications Interface 
Card 



HDE Products Are Available From: 



Johnson Computers 

Box 523 

Medina, Ohio 44256 

(216)725-4560 

Falk-Baker Associates 

382 Franklin Avenue 

Nutley, NJ 07110 

(201)661-2430 

Lux Associates 

20 Sunland Drive 

Chico, CA 95926 

(916)343-5033 

Specializing in SYM 



Progressive Computer Software 

405 Corbin Road 

York, PA 1 7403 

(717)845-4954 

Perry Peripherals 

P.O. Box 924 

Miller Place, NY 11764 

(516)744-6462 

Specializing in KIMSI and overseas sales 

A-B Computers 

1 1 5-B E. Stump Road 

Montgomeryville, PA 18936 

(215)699-5826 
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8E IF 08 
A 9 03 
8D 10 08 
A9 00 
8D 10 08 
60 



98 

8D IF 08 

A 9 02 

89 10 08 

A 9 00 

BO 10 08 

60 



A9 00 
80 13 08 
A9 01 
80 10 08 
AD IF 08 
A 8 

A9 00 
8D 10 08 
60 



20 73 20 
A 2 00 
A9 00 
20 00 20 
E8 

FO 11 
DO F6 
00 



20 73 20 
20 2F IE 
A 2 00 
20 08 20 
20 30 IE 
20 9E IE 
E8 



STX 
LDA 
ST A 
LDA 
STA 



OR EG A 

#3 
ORB 
*0 
ORB 



f STROBE IN THE REG ADDRE 



PTHE 'WRITE' ROUTINE ASSUMES THE 
P PROPER REGISTER VALUE HAS ALREADY 
P SETUP IN THE SOUND CHIP AND LOADS 
PTHE PROPER SOUND CHIP REGISTER WITH 
PTHE CONTENTS OF THE ACCUMULATOR, 
* 



WRITE TYA 
STA 
LDA 
STA 
LDA 
STA 



OREGA 

#2 

ORD 

#0 

ORD 



PTHE 'READ' ROUTINE ASSUMES THE PROPER 



P SOUND REGISTER 
PAND READS THAT 
P ACCUMULATOR, 



CHIP HAS 
REGISTER 



BEEN 
INTO 



SELECTED 
THE 



READ 



LDA 
STA 
LDA 
STA 
LDA 
TAY 
LDA 
STA 
RTS 



#0 

DDR A 
#1 

ORB 
OREGA 

#0 

ORB 



POET DATA 



PTHE 'CLEAR' ROUTINE 
PIN THE SOUND CHIP, 



ZEROS ALL THE REGISTERS 



CLEAR JSR 
LDX 

DOIT LDA 
JSR 
I NX 
CPX 
BNE 
BRK 



I NITS 
*0 
#0 
OUTPUT 

#17 

DOIT 



P THE 
PALL 
PTHE 



'CHECK' DUMPS THE CONTENTS OF 
THE SOUND CHIP REGISTERS TO 
SERIAL TERMINAL. 



CHECK- 



GET IT 



JSR 
JSR 
LDX 
JSR 
JSR 
JSR 
I NX 



I NITS 

CRLF 

#0 

INPUT 

PRTBYT 

OUTSP 
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01- 
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01- 
01- 
01- 
01- 
01- 
01- 
01- 
01- 
01- 



1000 
1010 
1020 
1030 
1040 
1060 
1061 
1062 
1063 
1064 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
•1410 
1420 
1430 
1440 
1442 
•1450 
1460 
1470 
•1480 
1490 
1500 
•1510 
•1520 
1530 



20 6 B 
206D 
206F 
2072 
2073 
2073 
2073 
2073 
2073 
2073 
2073 
2075 
2078 
207A 
207D 
207 E 
207E 
207E 
207E 
207E 
207E 
2080 
2082 
2085 
2087 
2089 
208C 
208E 
2090 
2093 
2095 
2097 
209 A 
209C 
209E 
20A1 
20A3 
20A5 
20A8 
20AA 
20 AC 
20 AF 
20B0 
20 BO 
20B0 
20B0 
20B0 
20B0 
20B0 
20B0 
20B2 
20B5 
20B8 
20B9 
20BB 
20BD 
20C0 
20 CO 



EO 
BO 
20 
00 



11 
F2 

2F 



IE 



A 9 
8B 
A9 
8B 
60 



A9 
A2 
20 
A9 
A2 
20 
A 9 
A2 
20 
A9 
A2 
20 
A9 
A2 
20 
A9 
A2 
20 
A9 
A2 
20 
00 



FF 
12 
00 

10 



A2 
BB 
20 
E8 
EO 
BO 
4C 



00 
06 
00 
07 
07 
00 
10 
08 
00 
38 
OC 
00 
10 
09 
00 
10 
OA 
00 
00 
OB 
00 



08 
08 



00 
00 
00 
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20 



20 



20 



20 



20 



20 



20 



20 



20 



CPX #17 

BNE GET IT 

J8R CFilLF 
BFv-K 



yTHE 'IN ITS' ROUTINE SETS UP THE 
16522 WITH PB0--PB7 AS OUTPUTS 
J AND WRITES A $00 TO THAT PORT. 



I NITS 



LB A #$FF 
ST A BBRB 
LBA #0 
STA ORB 
RTS 
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EXPLOS 



LBA 
LBX 
JSR 
LBA 
LBX 
JSR 
LBA 
LBX 
JSR 
LBA 
LBX 
JSR 
LBA 
LBX 
JSR 
LBA 
LBX 
JSR 
LBA 
LBX 
JSR 
BRK 



*$0 

*6 

OUTPUT 

#*7 

#7 

OUTPUT 

#$10 

#8 

OUTPUT 

#$38 

#12 

OUTPUT 

#$10 

#9 

OUTPUT 

#$10 

#10 

OUTPUT 

#0 

#13 

OUTPUT 



5 SETUP REG 6 



rSAME FOR REG 7 



PTHIS SECTION LOABS THE SOUND CHIP 
J WITH THE FIRST 16 BYTES STARTING AT 
i LOCATION $2500 



LOAD 
L00P1 



LBX 
LBA 
JSR 
I NX 
CPX 
BNE 
JMP 

.ENB 



#0 

STBUFyX 

OUTPUT 

#17 
L00P1 

CHECK 



?NOW GET DATA 



J DONE YET? 



J DUMP 



THE 
OF 



CONTENTS 
THE CHIP 



TO 
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More In Store 

Now that we have sound output, it's only logical 
that we should have some sort of analog input. Be- 
sides, if we only hook one sound chip to the 6522 we 
have plenty of lines left— so let's use 'em. I happen to 
have a NATIONAL ADC0816 laying around that's 
just waiting to do something. 

It's an 8 bit A/D converter with 16 analog 
inputs. The conversion time is around 100 us and it 
runs on a single 5 volt supply. Ideal for joysticks 
and other analog devices. 

Look for it in an upcoming column. 

You Got Time? 

What about the date? If your micro has need for the 
time and date, you'll be glad to hear that a new 18 
pin, CMOS clock/calendar chip (MSM 5832) has been 
introduced by OKI Semiconductor (1333 Lawrence 
Expressway, Santa Clara, CA 95051 (408-984-4842)) 
that can be easily interfaced to a 6522 VIA. In 
fact, it was made to interface with micros. 

The MSM 5832 chip and necessary crystal 
(32.768 KHZ) cost under $15 and is now generally 
available. If you can't find it locally, I got mine 
at Concord Computer Components (1973 So. State 
College, Anaheim, CA 92806 (714) 937-0637). 

More On Communications 

If you're interested in computer communications, 
two magazines recently had articles which will feed 
your enthusiasm. 

Byte magazine (June 1980) had two useful articles 
which you will want to read. 

The first article (on page 24) showed how to build 
a complete modem with pre-aligned filter modules 
which eliminates the need for complicated adjust- 
ments. The 6860 modem chip was used which is a 
perfect match for the new 6551 ACIA chip which is 
being manufactured by Rockwell and Synertek. 

Page 140 (of the same issue) presents two methods 
of having KIM dial your phone. The first method 
uses the conventional relay approach while the 
second one uses a D/A converter (just like the one 
on the Micro Technology Unlimited D/A board) to 
generate and mix the two signals necessary to create 
the touch-tone pair. 

Doctor Dobbs Journal (June/July 1980) devoted 
part of an issue to the subject of networking which 
included an update on the PCNET efforts of Dave 
Caulkins, several articles on networking and a 
description of MCALL-C, another communications 
protocol . 

They also had a directory of phone numbers for 
144 computerized bulletin board systems. 

Lots of things are happening in this area of 
personal computing and commercial computing, as 
well. If you're looking for a possible future 
career in some area of computing, telecommunica- 
tions is a good choice. 



HDE Software Bank 

Hudson Digital Electronics (Box 120, Allamuchy, N.J. 
07820 (201) 362-6574) has just concluded negotiations 
which would put Progressive Computer Software 
Inc. (405 Carbin Rd!, York, PA 17403) in charge 
of maintaining the HDE Users Library. 

The plan is to offer utility and applications 
programs available at a nominal disk copying charge. 

Contact HDE and/or Progressive for more details. 

6502 High-Level Languages Available 

Several high level languages arc available from the 
good folks at 6502 Program Exchange (2920 Moana, 
Reno, NV 89509). For AIM, KIM and SYM 
systems, they're offering FOCAL, TINY BASIC 
and XPLO (a compiler) as well as an editor and 
assembler. 

These people have been around since the beginn- 
ing and done much to help the 6502 attain its 
present popularity level. 

Send $1 for their latest catalog. ■§ 



MORE 

EPROM PROGRAMMER 

• 3K RAM EXPANSION SPACE 

• OUTPUT PORT EXPANSION 

• EPROM SOCKET FOR OFTEN 

NEEDED SOFTWARE 

• READY TO USE ON BARE 

KIM, SYM, AIM 

BOARD, SOFTWARE ON KIM 
FORMAT TAPE, MANUAL, 
LISTINGS, ALL PERSONALITY 
KEYS FOR 2708, 2716 (+5 
+ 12V) AND 2716, 2758, TMS 
2516 (5VONLY)- $169.95 

• 2708 EPROM WITH SOFT- 

WARE IS $20.00 

T.T.I. P.O. Box 2328 Cookeville, TN 38501 

Phone: 615-526-7579 



d 



PET . AIM . SYM KIM OWNER S 

|pinaisK!| 



'Tired of waiting for your cassette? 
'Want versatile, inexpensive expansion? 
'Want IBM floppy disk compatibility? 



THE IBM COMPATIBLE FLOPPY DISK 
SYSTEM WITH BVa" or 8" DRIVES 



'Want professional, sophisticated file handling? 
'Want consistant, reliable operation? 
'Want simple, easy-to-use disk syntax? 



CRS/PDOS 



A NEW SOPHISTICATED DISK 
OPERATING SYSTEM 

'Want a compatible disk-based Editor/ Assembler? OllO/ .TlOJYL 



NEW PET OWNERS 

PEDISK IS AVAILABLE FOR NEW PETS TOO! 



AIM, SYM, KIM OWNERS 

PEDISK ADAPTOR IS NOW AVAILABLE! 



PEDISK PACKAGE 1 $799.95 

5" DISK SYSTEM, CASE AND POWER SUPPLY 

PEDISK PACKAGE 2 $895.00 

5" DISK SYSTEM, S100 CARD CAGE, CASE AND POWER SUPPLY 

PEDISK PACKAGE 2A $495.00 

ADDITIONAL 5" DISK DRIVE, CASE AND POWER SUPPLY 

PEDISK PACKAGE 4 $1495.00 

8" DISK SYSTEM, S100 CARD CAGE. CASE AND POWER-SUPPLY 



EXS100 DISK CONTROLLER BOARD $49.95 

BARE BOARD 

EXS100 DISK CONTROLLER KIT $225.00 

AIM,SYM,KIM ADAPTOR KIT $25.00 

CRS/PDOS SOFTWARE SYSTEM $75.00 

SPECIFY OLD OR NEW ROMS, MEMORY SIZE 8K, 16K, 32K 

CRS/ASM EDITOR/ASSEMBLER $150.00 

SOFTWARE AVAILABLE ONLY FOR EXS100, PEDISK OWNERS 



*NEED MORE ROM ROOM? 

Toolkit and Word Pro II occupy the same rom space 
in your PET! No problem for Spacemaker. Simply 
install both in the Spacemaker and switch back and 
forth. Add User I/O and you can switch under soft- 



SPACEMAKER $29.00 

USER I/O $12.95 

CABLE ASSEMBLY AND SOFTWARE ON COMMODORE OR 
PEDISK DISK 

ROM DRIVER $39.00 

PORT CONTROL BOARD WITH SOFTWARE LISTING 

ROM I/O $9.95 

ROM DRIVER SOFTWARE ON COMMODORE OR PEDISK DISK. 
SEE YOUR LOCAL DEALER OR CONTACT: 



The Spacemaker 



ware control from the user port. User port occupied- 
then get Romdriver, a built-in switch control port. 
Spacemaker can grow as your switching problems do. 
Don't get caught behind in the ROM RACE. 



MICROTECH 

P.O. Box 102 

Langhorne, PA 19047 

215-757-0284 



PEDISK, Spacemaker is a trademark of CGRS Microtech 
Pet, Kim is a trademark of Commodore 
Aim is a trademark ol Rockwell 
SYM is a trademark of Synertek 
Toolkit is a trademark of Palo Alto KS. 
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An Evaluation: Marvin L DeJong 

The FIRST 
MATE/SECOND 
MATE By 
Micromate 



Ever since I began doing experimental work with 6502 
single-board microcomputers, such as the KIM-1, 
SYM-1, and the AIM 65, I have looked for a neat and 
convenient way for my students and me to bread- 
board circuits to be interfaced to the microcomputer. 
The FIRST MATE/SECOND MATE combination 
by MicroMate, P.O. Box 50111, Indianapolis, IN 
46256 will probably end my search. In my opinion, 
this system is an excellent way to prototype and 
interface circuits to the microcomputer. It will be of 
great interest to engineers, technicians and experi- 
ters as well to those of us involved in technical 
education. 

The SECOND MATE is simply a 2 'A " by 3/ 2 " 
printed circuit board with a 22/44 pin edge connector 
on one side, and a set of 44 printed circuit pads 
that duplicate the application and expansion edges on 
the KIM-1, SYM-1 or AIM 65. Thus, the SECOND 
MATE is transparent to any other devices you may 
want to connect to your microcomputer. Finally, the 
SECOND MATE has a 40 pin connector that connects 
to a 40 pin DIP jumper that connects the SECOND 
MATE to the FIRST MATE by a 40-strand ribbon 
cable. The DIP jumper is about 6" long. Thus, 
the SECOND MATE is connected to the micro- 
computer with the usual 22/44 pin edge connector, 
and the FIRST MATE connects to 40 of the 44 
lines that are available at these connectors. 

The FIRST MATE is a IVt " square printed 
circuit board upon which is mounted an SK-10 
breadboard, three 40-pin connectors, a position 
for a second SK-10 or another protoboard, four 
"universal" connectors for GND, +5V, +V and 
a -V supply. An LED indicates when power is applied, 
and several filter capacitors are also provided. The 
three 40-pin connectors on the FIRST MATE 
connect to either the expansion connector, the applica- 
tion connector or, if you have a SYM-1, the so- 
called AA connector. Suppose you wish to inter- 
face a circuit to the expansion connector on your 
microcomputer. The 40-pin DIP jumper is then con- 
nected to the 40-pin expansion connector on the 
FIRST MATE, while the SECOND MATE is plugged 
into the expansion port on the microcomputer. 



The eight data lines, the sixteen address lines, 
and eight control lines are then connected to 
labelled locations on the SK-10. Each labelled 
location allows up to five wires to be connected. 
The control lines are the usual ones, R/W, 0q 
RES, NMI, IRQ, RDY, SYNC, and one device 
select line. (For the SYM-1, the device select is the 
18 line. Some minor trace cutting and jumpering 
gives the CS8 line or another device select for the 
AIM 65.) 

If the FIRST MATE/SECOND MATE are con- 
nected to the application port, then the eight pins 
of Port A and the seven pins of Port B may be 
accessed on the SK-10 at labelled positions. Note that 
both the SYM-1 and the KIM-1 do not allow a 
connection to PB6 at the applications port. If you 
want to use the FIRST MATE with an AIM 65 
you will probably want to jumper PB6 to the SK-10 
as well as the control lines CA1, CA2, CB1, and 
CB2 from the VIA. This would be quite simple, but 
it would eliminate (or duplicate) some pin functions 
for the AA connector on the SYM-1. Connections 
can also be made to the expansion port and the 
applications port simultaneously if two SECOND 
MATES and two ribbon cables are purchased. 

The geometry of the First MATE was designed 
to mount on a SYM-1 with nylon spacers and 
screws. The FIRST MATE can probably be placed 
on a KIM-1 with no problems. For my AIM 65 I 
chose to build a little table consisting of 
two 4" X 8" pine legs and a 14" X 8" 
masonite perforated board for a top. This not 
only makes a dust cover for the AIM 65, but it 
also keeps mc from yelling at the cat when he 
decides to sleep on my microcomputer. If the little 
table is made about 8" deep then the printer paper 
can be easily seen. The FIRST MATE can be bolted 
to the perf-board top. I think it made a neat 
system, allowing me to work directly over the micro- 
computer when I was breadboarding a circuit. 

Clearly the FIRST MATE was designed for the 
SYM-1, but with a few simple modifications, some 
of which are suggested in the literature supplied 
with the FIRST MATE, it can be used with the 
AIM 65. No modifications are necessary for operation 
with the KIM-1. To put the FIRST MATE to the 
test, I breadboarded the simple stepper motor interface 
described in this issue. No modifications to the FIRST 
MATE were required for this circuit. 

Although there are other breadboarding schemes 
available (see TERC, 575 Technology Sq., Cam- 
bridge, MA 02139 for other possibilities) that are 
not being evaluated here because I have little or 
no experience with them, I can wholeheartedly 
recommend that you examine the MicroMate system 
for $87.50. I think it is an excellent approach to 
circuit development. I would like to see an AIM 65 
version of the system for sale, but the modifications 
are quite simple. 
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AIM 65 




AIM 65 is fully assembled, tested and warranted. With the 
addition of a low cost, readily available power supply, it's 
ready to start working for you. 

AIM 65 features on-board thermal printer and 
alphanumeric display, and a terminal-style keyboard. It 
has an addressing capability up to 65K bytes, and comes 
with a user-dedicated 1K or 4K RAM. Two installed 4K 
ROMS hold a powerful Advanced Interface Monitor 
program, and three spare sockets are included to expand 
on-board ROM or PROM up to 20K bytes. 

An Application Connector provides for attaching a TTY 
and one or two audio cassette recorders, and gives exter- 
nal access to the user-dedicated general purpose I/O lines. 

Also included as standard are a comprehensive AIM 65 
User's Manual, a handy pocket reference card, an R6500 
Hardware Manual, an R6500 Programming Manual and an 
AIM 65 schematic. 

AIM 65 is packaged on two compact modules. The 
circuit module is 12 inches wide and 10 inches long, the 
keyboard module is 12 inches wide and 4 inches long. 
They are connected by a detachable cable. 

THERMAL PRINTER 

Most desired feature on low-cost microcomputer systems . . 

• Wide 20-column printout 

• Versatile 5 x 7 dot matrix format 

• Complete 64-character ASCII alphanumeric format 

• Fast 120 lines per minute 

• Quite thermal operation 

• Proven reliability 

FULL-SIZE ALPHANUMERIC KEYBOARD 

Provides compatibility with system terminals . . . 

• Standard 54 key, terminal-style layout 

• 26 alphabetic characters 

• 10 numeric characters 

• 22 special characters 

• 9 control functions 

• 3 user-defined functions 

TRUE ALPHANUMERIC DISPLAY 

Provides legible and lengthy display . . . 

• 20 characters wide 

• 16-segment characters 

• High contrast monolithic characters 

• Complete 64-character ASCII alphanumeric format 



BY ROCKWELL INTERNATIONAL 



PROVEN R6500 MICROCOMPUTER SYSTEM DEVICES 

Reliable, high performance NMOS technology . . . 

• R6502 Central Processing Unit (CPU), operating at 1 
MHz. Has 65K address capability, 13 addressing modes 
and true index capability. Simple but powerful 56 
instructions. 

• Read/Write Memory, using R2114 Static RAM devices. 
Available in 1Kbyte and 4K byte versions. 

• 8K Monitor Program Memory, using R2332 Static ROM 
devices. Has sockets to accept additional 2332 ROM or 
2532 PROM devices, to expand on-board Program 
memory up to 20K bytes. 

• R6532 RAM-Input/Output-Timer (RIOT) combination 
device. Multipurpose circuit for AIM 65 Monitor functions. 

• Two R6522 Versatile Interface Adapter (VIA) devices, 
which support AIM 65 and user functions. Each VIA has 
two parallel and one serial 8-bit, bidirectional I/O ports, 
two 2-bit peripheral handshake control lines and two 
fully-programmable 16-bit interval timer/event counters. 

BUILT-IN EXPANSION CAPABILITY 

• 44-Pin Application Connector for peripheral add-ons 

• 44-Pin Expansion Connector has full system bus 

• Both connectors are KIM-1 compatible 

TTY AND AUDIO CASSETTE INTERFACES 

Standard interface to low-cost peripherals . . . 

• 20 ma. current loop TTY interface 

• Interface for two audio cassette recorders 

• Two audio cassette formats: ASCII KIM-1 compatible 
and binary, blocked file assembler compatible 

ROM RESIDENT ADVANCED INTERACTIVE MONITOR 

Advanced features found only on larger systems . . . 

• Monitor-generated prompts 

• Single keystroke commands 

• Address independent data entry 

• Debug aids 

• Error messages 

• Option and user interface linkage 

ADVANCED INTERACTIVE MONITOR COMMANDS 

• Major Function Entry 

• Instruction Entry and Disassembly 

• Display/Alter Registers and Memory 

• Manipulate Breakpoints , 

• Control Instruction/Trace 

• Control Peripheral Devices 

• Call User-Defined Functions 

• Comprehensive Text Editor 

LOW COST PLUG-IN OPTIONS 

• A65-010—4K Assembler— symbolic, two-pass $79.00 

• A65-020—8K BASIC Interpreter 99.00 

• 3K RAM Expansion Kit 50.00 

POWER SUPPLY SPECIFICATIONS 

• +5 VDC ± 5% regulated @ 2.0 amps (max) 

• +24 VDC + 15% unregulated @ 2.5 amps (peak) 
0.5 amps average 

PRICE: $389.00<ik ram) 

Plus $4.00 UPS (shipped in U.S. must give street address), 
$10 parcel post to APO's, FPO's, Alaska, Hawaii. All inter- 
national customers write for ordering information. 
We manufacture a complete line of high quality expansion 
boards. Use reader service card to be added to our mailing 
list, or U.S. residents send $1.00 (International send $3.00 
U.S.) for airmail delivery of our complete catalog. 




ENTERPRISES 

INCORPORATED 



2951 W. Fairmount Avenue 

Phoenix AZ 8501 7 
(602)265-7564 
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32 K BYTE MEMORY 

RELIABLE AND COST EFFECTIVE RAM FOR 

6502 (j 6800 BASED MICROCOMPUTERS 
AIM 65-*KIM*SYM 

PET*S44-BUS 



• PLUG COMPATIBLE WITH THE AIM-6S/SYM EXPANSION 
CONNECTOR BY USING A RIGHT ANGLE CONNECTOR 
(SUPPLIED) MOUNTED ON THE BACK OF THE MEMORY 
BOARD 

. MEMORY BOARO EDGE CONNECTOR PLUGS INTO THE 
6800 S 44 BUS 

• CONNECTS TO PET OR KIM USING AN AOAPTOR CABLE 

• RELIABLE-DYNAMIC RAM WITH ON BOARD INVISIBLE 
REFRESH-LOOKS LIKE STATIC MEMORY BUT AT 
LOWER COST AND A FRACTION OF THE POWER 
REQUIRED FOR STATIC BOARDS 

• USES -5V ONLY. SUPPLIED FROM HOST COMPUTER 

• FULL DOCUMENTATION. ASSEMBLEO AND TESTED 
BOARDS ARE GUARANTEED FOR ONE YEAR AND 
PURCHASE PRICE IS FULLY REFUNDABLE IF BOARO IS 
RETURNED UNDAMAGED WITHIN 14 DAYS. 

ASSEMBLEO WITH 32K RAM $419.00 

* WITH 16K RAM $349.00 

TESTEO WITHOUT RAM CHIPS $279.00 

HARD TO GET PARTS (NO RAM CHIPS) 

WITH BOARD AND MANUAL $109.00 

BARE BOARD & MANUAL $49.00 



PET INTERFACE KIT-CONNECTS THE 32K RAM BOARD TO 
A 4K OR 8K PET. CONTAINS: INTERFACE CABLE. BOARD 
STANDOFFS. POWER SUPPLY MODIFICATION KIT ANO 
COMPLETE INSTRUCTIONS $49.00 




I; I i I i i I I I I i i I M 




THE MK4U6-3 IS A 16.384 BIT HIGH SPEED 

NMOS. DYNAMIC RAM THEY ARE EQUIVALENT 

TO THE MOSTEK. TEXAS INSTRUMENTS. OR 

MOTOROLA4116-3. 

» 200 NSEC ACCESS TIME. 375 NSEC CYCLE 

TIME 
. 16 PIN TTL COMPATIBLE. 
. BURNED IN AND FULLY TESTED. 
. PARTS REPLACEMENT GUARANTEED FOR 

ONE YEAR. 

S8.50 f JCH III OUAHTITIES OF 8 



6502 & 6800 

64K BYTE RAM AND CONTSOLI.fR SET 

MAKE 64K BYTE MEMORY FOR YOUR 6800 OR 
6502 THIS CHIP SET INCLUDES: 

• 32M5K4116-3 16KX1. 200 NSEC RAMS. 

• 1 MC3480 MEMORY CONTROLLER. 

• 1MC3242A MEMORY ADDRESS 
MULTIPLEXER ANO COUNTER. 

« DATA AND APPLICATION SHEETS. PARTS 
TESTEO AND GUARANTEED. 
$295.00 PER SET 



COfTlPUTER DEUCES 

1230 UJ.COLLinS fll/6. 

ORflflGE, Cfl 92668 

(714)633-7280 

c.n.i. resldenls please add 6S sales tan. Mastercharge 
a Visa accepted. Please atlow 14 days lor checks lo 
'ear bank. Phone orders welcome. Shipping charge* 
111 be added (o all shipments. 

ALL ASSEMBLEO BOARDS ANO MEM- 
ORY CHIPS CARRY A FULL ONE YEAH 

REPLACEMENT WARAMTY 



KIMEX-1 HERE 



SANEATCOMBINATION 



IDEAL FOR DEDICATED INDUSTRIAL OR PERSONAL APPLICATION 



FEATURES 



PLUGS DIRECTLY INTO AND 
COVERS UPPER HALF OF KIM-1 . 
EXPANSION FINGERS CARRIED 
THROUGH FOR FURTHER 
EXPANSION. 

I/OPOWERFUL 6522 VIA 
PROVIDED. 

(VERSATILE INTERFACE 
ADAPTER) 

16 BI-DIRECTIONAL I/O LINES 
4 INTERRUPT/HANDSHAKE 
LINES 

2 INTERVAL TIMERS 
SHIFT REGISTER FOR SERIAL- 
PARALLEL/PARALLEL-SERIAL 
OPERATIONS. 

RAM-SOCKETS PROVIDED FOR 
4K RAM CONTIGUOUS WITH KIM 
RAM. 

(LOW POWER MOSTEK 41 1 8 
1KX8S) 
COMPLETE DOCUMENTATION 



• EPROMSOCKETS PROVIDED FOR 
8K EPROM. 

(INTEL 2716 2KX8S) 

• BLOCK SELECT SWITCHES FOR 
EPROM. 

EPROM USABLE IN ANY ONE OF 
FOUR 8K BLOCKS FROM 8OO0H. 

• AUTOMATIC RESET ON POWER- 
UP AND SWITCH SELECTABLE 
INTERRUPT VECTORS. 

• PERMITS UNATTENDED 
OPERATION. 

• LOW POWER CONSUMPTION- 
5V AT 300 Ma. FULLY LOADED 

• BUFFERED ADDRESS LINES 

• HIGH QUALITY PC BOARD. 
SOLDER MASK 

• ASSEMBLED AND TESTED 



APPLICATIONS 





PROM, RAM AND I/O EXPANSION ON ONE BOARD HAVING MANY INDUS- 
TRIAL/HOME APPLICATIONS FOR DATA ACQUISITION, PROCESS CONTROL, 
AUTOMATIC CONTROL OF FURNACE. SOLAR HEAT, LIGHTING. APPLI- 
ANCES. ETC 



PA RESIDENTS INCLUDE 6% STATE SALES TAX 



DIGITAL ENGINEERING ASSOCIATES 

P.O.BOX207 • BETHLEHEM. PA 18016 



i 



KIMEX-1 ATTACHED 

1 nrinr-i*' 



^r^AiflioNaaotj 

i -.'"-' • ii 



$139.95 

LIMITED TIME 1K RAM FREE ! ! ! 



■ KIM IS A REGISTERED TRADEMARK OF MOS TECHNOLOGY. INC. 
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Nuts And Volts 
No. 3 

Address Decoding 

Gene Zumchak 

An important consideration in microprocessor system 
design is address decoding. Address lines are decoded 
from the highest order lines to subdivide memory space 
into smaller blocks. For example, the top three lines, 
can be used to divide memory into eight 8K blocks; the 
top four lines, into sixteen 4K blocks; the high six 
lines, into sixty-four IK blocks; etc. There are 
numerous ways to do the decoding in hardware. If 
addresses need to be changed often, then dip switches 
and open collector Exclusive NOR (compare) gates can 
be used to compare any number of address lines with 
the selected polarity of that address line. The open 
collector outputs are wire-ORed together. If any gate 
is false the output will go low. An additional EX-NOR 
gate can be wired as an inverted to give a low true out- 
put. Figure 1. shows this method used to generate the 
IK select for $1000 (000100). If the address decoding 
is to be permanent, a single 3 to 8 decoder like a 
74LS138 can be used to give one, or several IK, 2K, 
4K, or 8K selects. Figure 2. shows a 74LS138 wired 
to give a select for $1000. Still another method is to 
use a 4-bit magnitude comparator chip, like the 
74LS85. These can be used with switches on one of the 
word inputs, and also can be cascaded to compare 
longer words. 

For 6502 systems, some users use 02 as an input 
to address decoders. This transfers the strobe action 
required for writing from the write input to the chip 
select. It also means than "reads" will be gated with 
02. The user can get away with this only because 
the hold time requirement for the 6502 on a read 
operation is so short. As mentioned in the first column, 
if 02 is seriously delayed via the address decode paths, 
the strobing action could occur after the write data 
has already gone away. In general, it is not the best 
practice to "gate" write data with the strobing signal. 

For ROM selects, it is desireable to gate in the 
R/W signal, so that the ROM select can never go true 
for a write operation. In the AIM, for example, ROM 
selects are generated from a 2 to 4 decoder. Ironically, 
this decoder has a gate input that was grounded 
instead of using the inverted R/W signal. If a write 
operation is attempted to ROM area, both the ROM 
and 6502 will attempt to drive the bus. Fortunately, 
most chips are designed to take momentary shorting 
and it is most unlikely that any harm will come to 
the 6502 or ROM. Still, it is careless design not to 
consider that writes may be attempted to read-only 
space. 
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Fig. 2 IK Select Using 3 to 8 Decoder 
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Fig. 3. Stealing Port Selects. 



Stealing Addresses 

What does one do when a few addresses are needed 
for I/O ports? Is it necessary to waste a large chunk 
of space for a few addresses? Clearly, more address 
lines can be decoded so that decoding is complete. 
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Still, it is questionable whether that helps much, 
since if the remaining space is to be used, it will have 
to be decoded to exclude those addresses. If you have 
space set aside for ROM, however, and if you won't 
need every last word, then it is possible to steal a few 
addresses for I/O without having to waste any other 
space. Suppose we have a IK select at $1000 which 
we will use for ROM. The circuit of figure 3. steals 
the top eight addresses of a IK select. The ROM will 
respond only to 1016 addresses. The top eight 
addresses generate eight I/O selects with a 74LS138. 

When designing 6502 controllers from scratch, 
the address stealing method illustrated can be used 
to extract I/O addresses from zero page. Rarely is all, 
or even half, of zero page needed for scratch pad. 
Putting I/O in zero page not only can considerably 
cut program length, but also speed up execution 
time. In some of my early controller designs, I used 
a pair of 256 x 4 RAM chips, and decoded addresses 
so that the RAM straddled pages zero and one. The 
low half of page zero was thus available for I/O. 

Special 6502 Address Considerations 

All 6502 systems have two address decoding needs in 
common. First of all, a select must respond to the 
very highest addresses where the reset and interrupt 
vectors are located. (It is too bad that one of the 
unused pins on the 6502 could not have been used 
for an open drain vector select. This would have 
allowed the user to wirc-OR this select with his own 
ROM area for response to the reset and interrupts.) 
The other consideration, of course, is that all 6502 
systems need RAM in zero page and page one (for 
stack). 

Interestingly, the KIM, SYM, and AIM use three 
different methods for interrupt response. The unex- 
panded KIM avoids the interrupt vector problem by 
not decoding the top three address lines so that 
every 8K block is the same. Thus the unexpanded 
KIM responds to $FFFC at $1FFC. If a KIM is 
expanded, its address decoder must be enabled only 
in the lowest 8K block. The interrupt vector area 
must be decoded with an open collector decoder and 
wire-ORed to KIM's K7 select ($1C00-$1FFF). The 
SYM causes the response to the reset vector to be 
ROM at $8FFC, but the response to the interrupt 
vectors to be the system RAM at $A600. How does it 
perform this magic? 

The SYM's reset lines go as usual, to the VIA 
port chips. All I/O lines on the VIA port chips come 
up in a high state at rest. The CA2 line of one of 
the VIAs is inverted to give a low-true Power On 
Reset signal which is effectively wire-ORed to the 
monitor ROM. Thus upon power up, the SYM finds 
the reset addresses at $8FFC and $8FFD, not 
because of decoding, but because the monitor ROM 
is held fast enabled by the POR line. One of the first 
things the reset program does is to reset the POR 
line. This line also inhibits normal address decoding. 



After POR is reset, normal address decoding takes 
place, and response to the interrupt vectors will be to 
the system RAM area (which is preloaded with 
default interrupt vectors at reset time). 

The AIM's solution is the simplest. It merely 
puts its 8K monitor in the highest 8K block of 
memory. Thus the reset and vector select is the nor- 
mal ROM select. 

The KIM, SYM, and AIM can all be used as 
the basis for dedicated controllers. In such an ap- 
plication, it is usually desireable for Reset to cause 
the user's controller program to begin. For either the 
KIM or SYM this is no problem. The KIM will re- 
quire external decoding of the reset vector space. The 
decode can be wire-ORed to the controller's ROM. 
The SYM allows the POR signal to be alternatively 
jumpered to any of the on board ROM sockets. The 
AIM, unfortunately, will require that some cutting 
be done to the board, and further decoding tacked 
on, so that monitor programs can still be used, 
without the monitor responding to the topmost vector 
addresses. For any of the three systems mentioned, 
when using them in a controller application, some in- 
put condition should be defined which will cause the 
program to enter the board's normal monitor pro- 
grams. 
Summary 

Address decoding uses the highest address lines to 
subdivide memory space into smaller chunks. Selects 
are used to enable RAM, ROM and I/O. Address 
selects can use 02 as an input, thus including the 
strobing action required for writing in the select. 
ROM selects should include the R/VV signal so that 
they will not respond to write operations. Address 
stealing can be used to obtain port selects from 
ROM area without wasting a large chunk of memory 
space. Similary, I/O addresses may be stolen from 
zero page RAM area. Various methods can be used 
to respond to the Reset and interrupt vectors at the 
top of memory space. A particularly versatile method 
is the Power On Reset used on the SYM. 

I welcome any comments or criticisms you may 
have of the material in this column. I invite your 
suggestions for topics for future columns. However, 
time and space do not allow major design projects for 
the column. € 
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EXCERT, INCORPORATED 

AIM-65 



* * * 



* * * 



SPECIAL 





A65-4AB 


AIM-65 w/4K RAM 
Assembler & BASIC ROM 


$595 




P/N 




QTY 1-9 


SPARE PARTS (When Available) 




A65-1 


AIM-65 w/lK RAM 


$375 


A65-P 


Printer 


$50 


A65-4 
A65-A 


AIM-65 w/4K RAM 
Assembler ROM 


$450 
$85 


A65-D 


Complete Display Bd. 
w/Exchange of Old Bd. 


$85 
$50 


A65-B 


BASIC ROM 


$100 


A65-K 


Keyboard 


$30 






ACCESSORIES 







P/NO. QTY 1-9 

Power Supplies 

(fully AIM-65 Compatible) 

PRS3 + 5V at 3A, + 24V at 1A w/mtg hardware, 
cord, etc $65 

PRS4 + 5V at 2A. + 24V at .5A w/mtg hardware, 
cord, etc $50 

From The Enclosure Group 

ENC1 AIM-65 case w/space for PRS3/PRS4 $45 

ENC1A AIM-65 case w/space for PRS3/PRS4 and one 
expansion board $49 

Cases with Power Supplies 

ENC3 ENC1 w/PRS3 mounted inside $115 

ENC3A ENC1A w/PRS3 mounted inside $119 

ENC4 ENC1 w/PRS4 mounted inside $100 

ENC4A ENC1A w/PRS4 mounted inside $104 

From The Computerist, Inc. 

MCP1 Mother Plus'" 1 - Dual 44 pin mother card takes 
MEB1, VIB1, PTC1, fully buffered, 5 expansion 
slots underneath the AIM $80 

MEB1 Memory Plus"" - 8K RAM, 8K PROM sockets, 
6522 I/O chip and programmer for 5V 
EPROMS (w/cables $215) $200 

PTC1 Proto Plus"" - Prototype card same size as 
KIM-1 MEB1, VIB1 $40 

VIB1 Video Plus ,m - Video bd w/128 char, 128 user 
char, up to 4K display RAM, light pen and 
ASCII keyboard interfaces w/cables .... $245 



P/NO. QTY 1-9 

From Seawell Marketing, Inc. 

MCP2 Little Buffered Mother™-Single 44 pin (KIM-4 
style) mother card takes MEB2, PGR2, PTC2 
and PI02. Has on board 5V regulator for 
AIM-65, 4 expansion slots. Routes A&E signals 
to duplicates on sides w/4K RAM $199 

MEB2 SEA 16™-16K static RAM bd takes 2114L 
w/regulators and address switches 
16K $325 

PGR2 Prommer™-Programmer for 5V EPROMS 
w/ROM firmware, regulators, 4 textool 
sockets, up to 8 EPROMS simultanously, can 
execute after programming $299 

PI02 Parallel I/O Bd w/4-6522's $260 

PTC2 Proto/ Blank™-Prototype card that fits MCP2 
$49 

PTC2A Proto/Pop™-w/regulator, decoders, switches 
$99 

From Optimal Technology 

ADCl A/D: 8 channels; D/A: 2 channels. Requires 
± 12v to ± 15 volts @ 100 ma and 2 1/0 ports 
from user 6522 $115.00 

Miscellaneous 

TPT2 Approved Thermal Paper Tape 

5/165 rolls $10 

MEM6 6/2114 RAM Chips $45 

CLOSE-OUT! 

From Beta Computer 

MEB3 32K Dynamic Memory Card w/on bd DC to 
DC converters (5V only .8A max) 
$375 



SYSTEMS 

We specialize in assembled and tested systems made from the above items. Normally, the price 
will be the total of the items, plus $5 for shipping, insurance and handling. Please call or write for 
exact prices or if questions arise. 



Higher quantities quoted upon request. 
COD's accepted. 

Add $5 for shipping, insurance, and handling. 
Minnesota residents add 4% sales tax. 



Mail Check or Money Order To: 

EXCERT, INC. 

Educational Computer Division 

P.O. BOX 8600 

WHITE BEAR LAKE, MN. 55110 

612-426-4114 
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A Simple 
Interface For A 
Stepper Motor 

Marvin L. De Jong 

Department of Mathematics-Physics 

The School of the Ozarks 

The circuit shown in Figure 1 and the programs given 
in Listing 1 allow you to drive a stepper motor with 
your 6502 based microcomputer. Why run a stepper 
motor? Perhaps to drive a solar panel to follow the 
sun, homebrew your own x-y plotter, run a pump at a 
preselected rate, or turn your robot's head. Whatever 
your application may be, here is some information to 
get you started working with stepper motors. You will 
want to get additional information from the following 
companies: 

AIRPAX 

North American Philips Controls Corp. 

Chesire Industrial Park 

Cheshire, CONN 06410 

(203) 272-0301 

Dana Industrial 

11901 Burke St. 

Santa Fe Springs, CA 90670 

(213) 698-2595 



You can get a nice Stepper Motor Handbook from 
AIRPAX, and the specification sheet for the Stepper 
Motor IC Driver SAA1027 also is available from AIR- 
PAX. The circuit we used made use of this inte- 
grated circuit driver and an AIRPAX 82701 stepper 
motor. The circuit was breadboarded on a FIRST 
MATE/SECOND MATE system from MicroMate. 

The circuit of Figure 1 consists of a 7406 inverter 
with high voltage open-collector outputs. Two pins 
of the Port B application port on the computer 
drive the 7406 which in turn controls the trigger 
(T) input and the rotation direcn (R) input on the 
stepper motor IC driver. The driver chip controls 
the stepper motor. 

Listing 1 gives several subroutines that may be 
used to control the motor. The instructions in the 
INITIALIZE routine should be used near the beginn- 
ing of any program to drive the stepper motor. 
These instructions place the proper logic levels on 
the T and R pins. In Listing 1 the initilization 
instructions are part of a short program from $0300 
to $0328 that will run the stepper motor at a con- 
stant rate. The rate used in this program is about 200 
steps/second, near the maximum rate for this particu- 
lar motor. Since each step for the 82701 is a 7.5 
step, the rotation rate is 250 rpm. 

The INITIALIZE and MOTOR RUN routines 
call two subroutines, TRIGGER and either CW or 
CCW. Calling subroutine TRIGGER produces one 
step on the stepper motor. If the TRIGGER call is 
preceded by a subroutine call for CW, then the motor 
will turn clockwise (CW). If CCW (for counterclock- 
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Figure 1. Sleppcr motor interlace. The SAA1027 is a special driver integrated circuit. The 7406 will also require five volts for its 
own power. 
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wise) is called, then the motor will turn counter- 
clockwise. The MOTOR RUN routine is an infinite 
loop, and is listed here to show how to make the 
motor run. Note that we have used the Tl timer on 
the 6522 VIA to control the time between steps. 

Subroutine MOVE can be used to turn the step- 
per motor a prescribed number of steps, either CW or 
CCW depending on which subroutine is called. The 
number of steps is stored in location STEPS at 
address $0000. Again, the Tl timer on the 6522 
VIA is used to produce the necessary delay between 



steps. The stepper motor is not capable of turning 
as fast as the computer can toggle the T input, 
hence either a timer delay or a delay loop must be 
used to wait. 

Be sure to get all the information about various 
motors and drivers before you get started with your 
project. Quite obviously, different projects will 
demand different motors; larger, smaller, geared, 
linear actuators, etc. Then build something spectacular 
and let us hear about it. 



Listing 1. Driver Routines for the Stepper Motor Interface. 



0300 A9 03 INITIALIZE 

0302 8D 02 A0 
0305 A9 00 
0307 8D 00 A0 

030A A9 40 MOTOR RUN 

030C 8D 0B A0 

030F A9 86 

0311 8D04 A0 

0314 A9 13 MORE 

0316 8D 05 A0 

0319 2C 0D A0 LOAF 

031C 50 FB 

03 IE 20 07 04 

0321 20 00 04 

0324 AD 04 A0 

0327 18 

0328 90 EA 

0400 EE 00 A0 TRIGGER 
0403 CE 00 A0 

0406 60 

0407 A9 02 CW 

0409 0D 00 A0 
040C 8D 00 A0 
040F 60 

0410 A9 FD CCW 
0412 2D 00 A0 

0415 8D 00 A0 
0418 60 

0500 A9 00 MOVE 

0502 8D 0B A0 

0505 20 10 04 

0508 A9 87 

050A 8D 04 A0 

050D A9 13 AGAIN 

050F 8D 05 A0 

0512 2C 0D A0 WAIT 

0515 50 FB 

0517 20 00 04 

051A C6 00 

051C DO EF 

05 IE 60 



LDA $03 
STA PBDD 
LDA $00 
STA PBD 

LDA $40 
STA ACR 
LDA $86 
STA TILL 
LDA $13 
STA T1LH 
BIT IFR 
BVC LOAF 
JSRCW 
JSR TRIGGER 
LDA T1CL 
CLC 
BCC MORE 

INC PBD 
DEC PBD 
RTS 

LDA $02 
ORA PBD 
STA PBD 
RTS 

LDA $FD 
AND PBD 
STA PBD 
RTS 

LDA $00 
STA ACR 
JSR CCW 
LDA $87 
STA TILL 
LDA $13 
STA T1LH 
BIT IFR 
BVC WAIT 
JSR TRIGGER 
DEC STEPS 
BNE AGAIN 
RTS 



Set up Port B to make pins PB0 and PB1 
output pins. 

Pull driver pins T and R to logic one 
through the 7406 inverter. 

Put the Tl timer in its free-running 
mode by setting bit six to logic one. 
Set up the Tl timer to time out every 
5 milliseconds giving 200 steps/sec. 
($1386 +2 = 5000) 
Now the timer is loaded and running. 
Has the timer timed out? 
No. Then loaf here. 
Subroutine CW will result in motor 
running clockwise, CCW turns it counter- 
clockwise. Subroutine TRIGGER produces 
one step of the motor. 
Clear the interrupt flag, then return 
to make another step. 
Pulse the T input of the stepper motor 
driver. 

Bring the R input to logic zero for 
clockwise (CW) rotation, by making 
PB1 logic one. 

Bring the R input to logic one for 
counterclockwise (CCW) rotation, by 
making PB1 logic zero. 

Set up Tl for the one-shot mode 
by clearing the 6522 ACR. 
Motor will turn counterclockwise. 
Timer will wait 5 milliseconds between 
steps. 

Timer is now loaded and running. 

Has it timed out? 

No. Then wait here. 

Here the motor turns one step. 

Decrement the step counter. 

Has it reached zero? 

Yes. Then turn is complete. 
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6502 7.45 10 @ 6.95 50 @ 6.55 100 

6502A 8.40 10 @ 7.95 50 @> 7.35 100 

6520 PI A 5.15 10 @ 4.90 50 @> 4.45 100 

6522 VIA 7.15 10 @ 6.95 50® 6.45 100 



6532 7.90 10 @ 

2114-L450 

2114-L300 

2716 EPROM 

4116-200 ns RAM 

6550 RAM (PET 8K) 

21L02 

S-100 Wire Wrap 

S-100 Solder Tail 



7.40 50 C<s 
4.75 20 @ 
5.95 20 @ 

21.00 5 <5> 
7.00 



7.00 100 
4 45 100 
5.45 100 
19.00 10 



2.85 10 
2.35 10 



9 6.15 
@ 6.90 
@ 4.15 
@ 6.00 
@ 6.60 
@> 4.15 
@ 5.10 
@ 17.00 
(B 6.25 
12.70 
90 
@ 2.65 
@> 2.15 



CASSETTES— AGFA PE-61 1 PREMIUM 

High output, low noise. 5 screw housing, labels. 

C-10 10/5.65 50/2500 100/48.00 

C-20 10/6.45 50/29.50 100/57.00 

C-30 10/7.30 50/34.00 100/66.00 

All other lengths available. Write tor price list. 



DISKS 

(write for quantity prices) 

SCOTCH 8" Disks 
SCOTCH 5.25" Oisks 
Verbatim 5.25" Oisks 
Diskette Storage Pages 
Disk Library Cases 
BASF 5.25" Disks 
BASF 8" Disks 




8" - 2.95 



10/S31.00 
10/ 31.50 
10/ 24 50 
10/ 3.95 
5" -2.15 
10/ 25.00 
10/ 2700 



ATARI— INTRODUCTORY SPECIAL 

Atari 400. Atari 800, all Atari Modules 20% OFF 



115 E. Stump Road 

Montgomeryvllle. PA 18936 21 5-699-5826 



Commodore CBM- 
PET SPECIALS 

-Up to S235 free 
yX/ merchandise 
<£y with purchase of one of 
<C following CBM-PET 
items: 

8032 32K-80 column CRT 

8016 16K-80 column CRT 

8050 Dual Disk Drive-950.000 byles 

CBM Modem-IEEE Interface 

CBM Voice Synthesizer 

8N full size graphics keyboard 

1 6N full size graphics keyboard 

32N lull size graphics keyboard 

16B full size business keyboard 

32B lull size business keyboard 

2040 Dual Disk Drive-343.000 bytes 

2022 Tractor Feed Printer 

2023 Pressure Feed Printer 
C2N External Cassette Deck 
Used 8K PETs (limited quantities) 




"" EDUCATIONAL DISCOUNTS "" 

Buy 2 computers, get 1 FREE 



CBM Full Size Graphics Keyboard 


S 74 


CBM WordPro l-for 8K PET 


25 


CBM WordPro 11-16 or 32K, 2040, Printer 


88 


CBM WordPro III-32K. 2040, Printer 


178 


VISICALC lor PET (CBM/Personal Software) 


S128 


CBM Assembler/Editor (disk) 


89 


CBM General Ledger, A/P. A/R NEW! 


270 



Programmers Toolkit-PET ROM Utilities 

PET Spacemaker Switch 

Dust Cover lor PET 

IEEE-Parallel Printer Interlace for PET 

IEEE-RS232 Printer Interface for PET 



S 44.90 

22.90 

7.90 

79.00 

14900 



Centronics 737 Proportional Spacing Printer $845 

NEC Spinwriter-parallel 2450 



SYM-1 $209 with 4K RAM S 238 

SYM BAS-1 BASIC in ROM 85 

SYM RAE-1/2 Assembler in ROM 85 

MOT 1000 Synertek Development System 1345 

KTM-2/80 Synertek Video Board 349 

KIM-1 (add $34 lor power supply) 159 

Seawell Motherboard-4K RAM 195 

Seawell 16K Static RAM-KIM. SYM, AIM 320 

.S-100 Static RAM kit SALE 198 

Leedex Video 100 12" Monitor 129 

Zenith Z19 Terminal (factory asm) 770 

KL-4M Four Voice Music Board for PET $34 90 

Visible Music Monitor (4 Voice) for PET 29.90 

SPECIAL-KL-4M with Visible Music Monitor 59.90 



MICR0THELL0 for PET by Michael Riley S9.95 

Machine language version— you can't win at Level 5 

S29.95 



PAPER MATE 60 Command PET Word Processor 
Full-featured version by Michael Riley 



H 



A P Products 15% OFF 



A B Computers 



All Book and Software Prices are Discounted 

PET Personal Computer Guide (Osborne) $12.75 

PET and the I EE E-488 Bus (Osborne) 1 2.75 

6502 Assembly Language (Osborne) 9.45 

Programming the 6502 (Zaks) 1 0.45 

6502 Applications Book (Zaks) 10.45 

Programming a Microcomputer: 6502 7.75 

6502 Software Bookbook (Scelbi) 9.45 



WRITE FOR CATALOG 

Add $1 per order lor shipping. We pay balance 

of UPS surface charges on all prepaid orders 



DISK DRIVE WOES? PRINTER INTERACTION? 

MEMORY LOSS? ERRATIC OPERATION? 

DON'T BLAME THE SOFTWARE! 





ISO-1 "~^ ISO-2 

Power Line Spikes, Surges & Hash could be the culprit! 
Floppies, printers, memory & processor often interact! 
Our unique ISOLATORS eliminate equipment interaction 
AND curb damaging Power Line Spikes, Surges and Hash. 
•ISOLATOR (ISO-1 A) 3 filter isolated 3-prong sockets; 
integral Surge/Spike Suppression; 1875 W Maximum load, 

1 KW load any socket $56.95 

•ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; 
(6 sockets total); integral Spike/Surge Suppression, 
1875 W Max load, 1 KW either bank $56.95 

•SUPER ISOLATOR (ISO-3), similar to ISO-1A 

except double filtering & Suppression .... 
•ISOLATOR (ISO-4), similar to ISO-1 A except 

unit has 6 individually filtered sockets .... 
•ISOLATOR (ISO-5). similar to ISO-2 except 

unit has 3 socket banks, 9 sockets total . . . 
•CIRCUIT BREAKER, any model (add-CB) Add 
•CKTBRKR/SWITCH/PILOTany model 

(-CBS) Add $14.00 

PHONE ORDERS 1-617-655-1532 

/S? Electronic Specialists, Inc. 



$85.95 
$96.95 

$79.95 
$ 7.00 



171 South Main Street. Natick. Mass. 01760 



Dept. C 



••**•••*■••••••••**•••*•*****•**** 
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FROM CASSETTE FAILURES 
PERRY PERIPHERALS HAS 
THE HDE SOLUTION 
OMNIDISK SYSTEMS (5" and 8") 

ACCLAIMED HDE SOFTWARE 

• Assembler, Dynamic Debugging Tool, 
Text Output Processor, Comprehensive 
Memory Test 

• Coming Soon— HDE BASIC 

PERRY PERIPHERALS S-100 PACKAGE 

Adds Omnidisk (5") to 
Your KIM/S-100 System 

• Construction Manual— No Parts 

• FODS & TED Diskette 

• $20. +$2. postage & handling. (NY residents 
add 7% tax) (specify for 1 or 2 drive system) 

Place your order with: 
PERRY PERIPHERALS 

P.O. Box 924 
Miller Place, N.Y. 11764 
(516)744-6462 

Your Full-Line HDE Distributor/ Exporter 
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GET rich QUICK 



Gene Zumchak 



Actually, it was never my intention to get rich. It's 
just that I've dropped out of the working world for 
several months to concentrate on writing a book, and 
I was starting to miss having a little income. Last 
summer I read Don Lancaster's "Incredible Secret 
Money Machine" which is a very entertaining 
dissertation on going into business for yourself. A 
couple of his ideas are keep it small, and sell it 
cheap. It occurred to me that selling some blank PC 
boards might fit those qualifications. So I asked 
myself, what does everyone need? My most useful 
accessory is my EPROM programmer. I don't need 
it that often, but it's indispensible when I do. With 
2708's dropping down to the $7 level, and five volt 
only 2716's dipping below $20, it would seem that no 
one should be without an EPROM programmer. 

In small quantities I have to pay a little over $6 
for a blank board. I figured if I offered the board for 
f 19, I'd make $10 on every one I sold. If I sold a 
modest fifteen a month, that would make a $150 
dent in my office overhead of almost $400. I certain- 
ly wouldn't get rich, but it would help a little. It 
seemed simple enough. 

I should have known better. You just can't drop 
a blank PC board into an envelope and mail it. You 
need a parts list, schematic, software, circuit descrip- 
tion, software description, etc. I already had much of 
that material, but it required updating, and I ended 
up doing most of it over from scratch. Before I was 
finished, I had over 20 pages of documentation, and 
about $1500 of my time invested. I'll need to sell 150 
boards just to pay for my lost time. That is, that's 
how many I'd have to sell IF I made the $10 a board 
that I had planned on. 

After my ad came out, the inquiries came 
"pouring" in. Unfortunately, the material I send out 
is over an ounce and it's costing me $.28 to mail it 
first class. Then there's the cost of the printed 
material. In all, it costs over $.50 for every inquiry. 
If one in twenty (a very high return), results in an 
order, then it will cost me $10 in mailings to get that 
order. Well, there goes that $10 profit. Of course, I 
failed to account for the $10 of my time I spend pro- 
cessing the info requests. Then there's the cost of 
placing the ad. With a little bit of luck, I'll only lose 



two or three dollars on every board I sell. Make that 
five. I forgot to account for some of my overhead. 
Boy am I dumb. 

It sort of looks like, the fewer boards I sell, the 
belter off I am. I guess I should consider myself very 
fortunate that I've sold only three boards. It does 
make me wonder, though, how all you non- 
customers out there program your EPROMs. Maybe 
you all bought programmers last year. I guess others 
are waiting for the price to drop. 

The very saddest part of this situation is that 
like other forms of gambling, you don't know how to 
stop. I reason, I already have $1500 sunk into this, I 
might as well stick it out a little longer. There's real- 
ly no hope for me. 

Actually, I have been selling KIM accessories 
for years, so I really ought to know better. For my 
several thousand hours already invested, I'm only a 
thousand dollars in the hole. At least I can take com- 
fort in knowing that my lack of success is not at- 
tributable to poor quality or design. My customers 
(both of them) are just thrilled with my work. 

If nothing else, I've developed a great deal of 
respect for those others who are building and selling 
hardware, and actually making a living at it. If you 
have designed and built something for yourself that 
you think the rest of the world could use, forget it 
quickly, before it's too late. Take a cold shower. If 
you're thinking of saving a little money by designing 
and building something yourself, save yourself the 
misry. Someone else has already done it. Just to 
duplicate my hardware and software efforts on a sim- 
ple project like the Programmer would take at least 
$500 of your time. You're farther ahead using your 
spare lime to sell hamburgers at minimum wage and 
buying yourself a really nice programmer. But then 
there's not that satisfaction of doing it yoursell. 

Actually, the programmer project was the good 
news. I haven't even told you about the other board, 
the EPROM Emulator. But that will have to wait. I 
have to go. There's a couple of gentlemen in white 
coats at my door. 1 don't believe it. At last, some 
customers. © 
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KIM-1 TIDBITS 

Harvey B. Herman 
Chemistry Department 
University of North Carolina at 
Greensboro 
Greensboro, NC 27412 

This article is the second in what I hope is a 
continuing series on the KIM. My intention is to share 
with others programs which should make KIM easier 
to use. The reader will please note that the machine 
language programs have been documented with the 
excellent Macro Assembler and Text Editor (ASSM/ 
TED) from Eastern House software (see my review 
in COMPUTE #1, plOO). When I started messing with 
KIM several years ago, my programs were mostly 
hand assembled. This task has been made much easier 
by using ASSM/TED. 

The first program is an implementation of a KIM 
real-time clock (sometimes called a tick counter). 
I have whimsically referred to it as a 'Jeffrey counter' 
after a former student of mine. Every 100 milli-" 
seconds a location-in page zero is incremented. By 
peeking at this location one can time external 
events up to about 25 seconds. We have used it to 



tell when to take readings from an analog-to- 
digital converter. The clock can be started, stopped 
or read under program control. A source listing of 
the program is shown in figure 1 . An example of a 
BASIC program which uses the tick counter is shown 
in figure 2. 

In order for this program to work one external 
connection needs to be made. The counter is interrupt 
driven and requires PB7 on the application connec- 
tor (A - 15) to be connected directly to IRQ (E - 4). 
The program sets PB7 as an input line and initializes 
the IRQ. vectors at $17FE/$17FF to point to the clock 
service routine. For convenience I have modified 
KIM Microsoft BASIC to execute a preamble which, 
among other things, sets up these vectors before 
jumping to the normal start of BASIC. 

The second program is an enhancement to KIM 
Microsoft BASIC. Support is added for a terminal 
(e.g. ASR 33 Teletype) which used the X - ON/X 
- OFF protocol to start and stop a paper tape reader. 
Over the years I had accumulated a number of pro- 
grams on paper tape which I wanted to use with 
KIM BASIC. As supplied the BASIC software did 
not read paper tapes reliably and I had no 
desire to key in long programs again. I waded 
through a dissassembly of BASIC and found two calls 
to a subroutine which could be called "input a line". 









0100 


; 








0110 


J INTERRUPT SERVICE ROUTINE FOR REAL-TIME CLOCK 








0120 


JCTICK COUNTER). ENHANCEMENT TO KIM MICROSOFT 








0130 


; BASIC. 1/10 SEC PER TIC 








0140 


I 








0150 


; HARVEY B. HERMAN 








0160 


1 








0170 


I REQUIRES CONNECTION OF IRQ TO PB7. 








0180 


iSET ALL PB PINS AS INPUT. SET ORIGINAL COUNT 








0190 


;AND DIVIDE RATE</1024) OF 6530 TIMER. 








0200 


J START TICKINC-POKE 5891>0iPOKE 5903*98 








0210 


; DISABLE IRQ (OTHER VAYS POSSIBLE). 








0220 


J STOP TICKING-POKE 5894/98 








0230 


»READ TICK C0UNTER-PEEKC224) 








0240 


JRESET STOPS CLOCK. 








02SO 


1 








0260 


TICK . DE SE0 ;FREE LOCATION PAGE ZERO 








0270 


COUNT *DE S62 ; 1/ I SEC 








0280 


CLKKTE .DE S170F J DIVIDE BY 1024UNT. EN.) 








29 


IRQL .DE SI7FE JKIM IRQ INTERRUPT 








0300 


IRQH .DE S17FF S VECTORS 








0310 


; 








0320 


; INITIALIZATION ROUTINE 








0330 


;SET UP VECTORS AND ZERO TICK COUNTER 








0340 


; LOCATE ANYWHERE CONVENIENT 








0350 


•BA S4368 








0360 


;0THER CODE ABOVE IN MY VERSION 


4368- 


A9 


DA 


0370 


LDA #INTER 


436A- 


8D 


FE J 7 


0380 


STA IRQL 


436D- 


A9 


02 


0390 


LDA #H» INTER 


436F- 


8D 


FF 17 


0400 


STA IRQH 


4372- 


A9 


00 


0410 


LDA #00 


4374- 


85 


EO 


0420 
0430 
0440 
0450 
0460 


STA «TICK 
JOTHER CODE BELOW IN MY VERSION 

; INTERRUPT HERE ON TIMEOUT 
•BA S2DA 


02DA- 


48 




0470 


INTER PHA 


02DB- 


EA 




0480 


NOP JHIDE MY IGNORANCE 


02DC- 


E6 


EO 


049 


INC «TICK 


02DE- 


A9 


62 


0500 


LDA #COUNT 


02E0- 


8D 


OF 17 


0510 


STA CLKKTE 


02E3- 


68 




0520 


PLA 


02E4- 


40 




0530 
0540 


RT1 
.EN 
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Skylcs Electric Works 



Presenting the Skyles MacroTeA 

The Software Development System 
For the Serious Programmer 

Text Editor Fast... Fast Assembler Enhanced Monitor 



To help you write your program, MacroTeA includes a 
powerful texl editor with 34 command functions: 
AUTO Numbers lines automatically. 
NUMBER Automatically renumbers lines 
FORMAT Outputs text tile in easyto-read columns 
COPY Copies a line 0' group of lines to a new 



MOVE 

DELETE 
CLEAR 
PRINT 

PUT 



DUPLICATE 



HARD 
ASSEMBLE 



e or group of lines to a new 



SYMBOLS 
SET 



MANUSCRIPT 



Copies a 
location 

Moves a 
location. 

Deletes a line or group of lines 
Clears the text lile. 
Prints a fine or group of lines to 
the PET screen 



i group of lines of text on 
rd.se). 



Saves a lir 

ihe tape (o 

Loads a previously saved line or group of lines 

of text from the tape lo> disc) 

Copies text file modules from one tape 

recorder to the other. Stops on specific 

modules to allow changes before >t is dupli 

cated This command makes an unlimited 

length program (text file) practical 

Prints out texl file On printer. 

Assembles text file with or without a listing. 

Assembly may be specified for the ob|ect code 

(program) to be recorded or placed in RAM 

memory 

Does second pass of assembly. Another 
command that makes unlimited length text 
files (source code) practical 

Runs (executes) a previously assembled 
program 

Prints out the symbol table (label file) 

Gives complete control of the si/e and location 

of the text file (source file), label file (symbol 

table) and relocatable buffer 

Gives complete access to the eleven DOS 

commands; 

PUT GET NEW INITIALIZE 

DIRECTORY COPY DUPLICATE 

SCRATCH VALIDATE RENAME 

ERROR REPORT 

Offers unbelievably powerful search and replace 
capability. Many large computer assemblers 
lack this sophistication. 

Searches text file for defined strings Optionally 
prints them and counts them; i.e., this command 
counts number of characters in texl file. 

Eliminates line numbers on PRINT and HARD 
command. Makes MacroTea a true and power 
lul Text Editor 

Breaks to the Monitor portion of MacroTea 
A return to Text Editor without loss of text 
is possible. 

Improves or tailors MacroTea's Text Editor 
to user's needs; "Do n-yourself" command. 



Briefly. 

• BA 

• CE 

• LS 

• LC 

• CT 

• OS 

• OC 

• MC 

• SE 

• DS 

• BY 

• SI 

• DE 



the pseudo-ops ate: 

Commands the assombiei to begin placing assembled 
code where indicated. 

Commands the assembler to continue assembly unless 
certain serious errors occur All errors are printed out 

Commands the assembler to start listing source (text 
lilel from this point on 

Commands the assembler to stop list source (text file) 
Irom this point in the program. 

Commands the assembler to continue that source 
program (text file) on tape. 

Commands the assembler to store the obiect code in 



Commands the assembler to not store object code in 

memory 

Commands the assembler to store object code at loca 

tion different from the location in which it is assembling 

obiect code. 

Commands the assembler to store an external address 

Commands the assembler to set aside a block of storage 

Commands the assembler to store data. 

Commands the assembler to store an internal address. 

Commands the assembler to calculate an external label 
expression 

• Dl Commands the assembler to calculate an internal label 

expression 

• EN Informs the assembler that this is the end of the 

program. 

• EJ Commands the assembler to eject to top of page on 

printer copy. 

• SET A directive not a pseudo-op, directs the assemblers to 

redefine the value of a label. 

Macro Assembler 

The macro pseudo-ops include: 

WD This is a macro beginning instruction definition. 

ME This is end of a macro instruction definition. 

EC Do not output macro -generated code in sou'C** 

listing 
ES Oo output macro -generated code in source 

listing 

Conditional Assembler 

The conditional assembly pseudo-ops are: 

IEQ II the label expression is equal to zeto. 

assemble this block of source code (text file). 
INE H the label expression is not equal to zero. 

assemble this block of source code (lext tile). 
IPL If (he label expression is positive, assemble this 

block of source code. 
IMI If the label expression is negative, assemble 

this block of source code. 
*•• This is the end of a block of source code. 



. . . By having 76 powerful commands: 

A Automatic MacroTeA cold start Irom Monitor 

Z Automatic MacroTeA warm start from Monitor 

F Loads from tape object code program. 

S Saves to tape object code between locations 

specified. 
D Disassembles object code back to source listing. 

M Displays in memory object code starting at selected 

location The normal PET screen edit may be used 

to change the object code. 
R Displays in register. Contents may be changed using 

PET screen edit capabilities 
H Hunts memory for a particular group of object 

codes. 
W Allows you to walk through the program one step 

at a time. 
B Breakpoint to occur after specified number of 

passes past specified address. 

Start on specified address. Quit it STOP key or 
breakpoint occurs. 

T Transfers a program or part of a program from one 

memory area to another. 
G Go" Huns machine language program starting at 

selected location 
X Exits back to BASIC 

1 Display memory and decoded ASCII characters. 
P Pack (fill) memory with specified byte. 

what are the other 
unique features of the 
MacroTeA? 

• Labels up to 10 characters in length 

• 50 different symbols to choose from for each character 

• 10 16 different labels possible 

• Create executable object code in memory or 
store on tape 

• Text editor may be used for composing letters, 
manuscripts, etc, 

• Text may be loaded and stored from tape or disc 

• Powerful two-cassette duplicator function 

• String search capability 

• Macros may be nested 32 deep 

• 25 Assembler psuedo-ops 

• 5 Conditional assembler psuedo-ops 

• 40 Error codes to pinpoint problems 

• 16 Error codes related to Macros 

• Warm-start button 

• Enhanced monitor with 16 commands 




Truly, there is simply no other system of this magnitude at anywhere near 
this price. $395.00* 

(With any Skyles Memory Expansion System, $375. 00 

Calilorma residents please add 6°c or 6 5% sales lax as required 
VISA, MASTERCHARGE ORDERS CALL (800) 538-3083 (except California residents) 
CALIFORNIA ORDERS PLEASE CALL (408) 257-9140 



Skyles Electric Works 



231 E South Whisman Road 
Mountain. View, CA 94041 
(415) 965-1735 
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The change I made was to send out an X - ON 
character (with added code in page 2) before jumping 
to this subroutine. My paper tape reader will begin 
reading upon receipt of this character. 

It was necessary to make one further change in 
order for KIM to punch BASIC program tapes that 
would read back properly. The tape reader must 
stop after carriage return while BASIC "digests" 
a line. Therefore the X - OFF character (stop v 
reading) must be included in the data stream. I 
found a call to BASIC 's output routine immediately 
after loading the accumulator with "CR" (hex OD). 
I changed this to a jump to code, again in page 2, 
which outputs X - OFF and CR before continuing 
as before. Later when the teletype reads the X - OFF 
character on tape it shuts off but does not stop 
immediately and reads one additional character (CR). 
Return sets the BASIC interpreter off and running. 
In a short time, after digesting the line, BASIC 



sends the X - ON character asking for more data. 
Only one caveat - remember to type control/0 before 
and after reading tapes so the teletype will only single 
space. 

I hope these additional programs will be found 
useful. As always, if you have any questions I will 
be happy to respond if you include a SASE. 



10 REM EXAMPLE PROGRAM TO PRINT A NUMBER 

20 REM ONCE EVERY 10 SECONDS 

30 POKE 5903,98: REM START CLOCK 

40 FOR I = 1 TO 10 

50 POKE 224,0: REM ZERO CLOCK 

60 IF PEEK (224) <100 THEN 60 

70 PRINT I; 

80 NEXT I 

90 POKE 5894,98: REM STOP CLOCK 

100 END 



2351- 20 C8 02 
2AB6- 4C C8 2 



02C8- A9 11 
02CA- 20 A0 IE 

02CD- 4C 26 24 



29C3- 20 DO 02 



02D0- A9 13 

02D2- 20 3A 2A 

02D5- A9 0D 

02D7- 4C 3A 2A 



29D7- DO F8 



0100 
0110 
0120 
0130 
0140 
0150 
0160 
0170 
0180 
0190 
0200 
0210 
0220 
0230 
240 
25 
0260 
0270 
28 
0290 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
39 
0400 
0410 
0420 
0430 
0440 
0450 
0460 
0470 

048 

049 
0500 
0510 
0520 
0530 
0540 
0550 
0560 
0570 
58 
59 



;x-0n/x-off enhancement to 
;kim microsoft basic 
; serial number 9011 

s 

; HARVEY B. HERMAN 

s 

; SENDS X-ONCHEX 1 1 ) TO TERMINAL BEFORE JUMPING TO 

; "INPUT A LINE". TERMINALS WITH THIS FEATURE WILL 

; AUTOMATICALLY START READING PAPER TAPE. WHEN AN 

X-OFFCHEX 13) IS READ* THE TAPE READER CONTROL 

WILL TURN OFF AND THE READER WILL COAST AND 

TRANSMIT ONE EXTRA CHARACTER- 



PUNCHES PAPER TAPECBY LIST) WITH X-OFF/CR/LF/ 
NULLCS) AS END OF LINE FORMAT. 



.NULLCS) CORRECTIONCNECESSARY FOR EARLY VERSIONS 
;OF BASIC)* 



;KIM OUTPUT ROUTINE 
; BASIC "INPUT A LINE" 
; BASIC OUTPUT ROUTINE 
; INSTRUCTION LDA #00 

•INPUT A LINE" 



OUTCH .DE S1EA0 

INPUT .DE $24 26 

OUTPUT .DE S2A3A 

LDA0 >DE S29D1 

; 

; INTERCEPT CALLS TO 

•BA £2351 

JSR XON 

.BA S2AB6 

JMP XON 
;OUTPUT X-ON CHARACTER 

.BA S2C8 
XON LDA »ill 

JSR OUTCH 

JMP INPUT 
; INTERCEPT CALLS TO OUTPUT CR 

•BA S29C3 

JSR XOFF 
JOUTPUT X-OFF/CR CHARACTERS 

.BA S2D0 
XOFF LDA #S13 

JSR OUTPUT 

LDA #S0D 

jmp output 
i correct nullcs) error in early version 
;of basic. a was destroyed by output and must 
;be loaded again with zero. 

.BA S29D7 
BNE LDA0 
.EN 



;x-on 

jout to terminal 
; input a line 



IX-OFF 

; basic output routine 
;cr 
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FACTORY PRICING 

IN STOCK! IMMEDIATE DELIVERY! 



»«*«** 



,o* "» 66 °° 



PLUS 



• MPS 6550 RAM for PET 

• MPS 6530-002, -003 for KIM-1 

• MANUALS 

• KIM-1 MICROCOMPUTER 

• KIM-3 8K STATIC RAM MEMORY BOARD 

• KIM-4 MOTHERBOARD 

• KIM PROMMER 

KIM-1 & 4 Compatable Eprom Programmer 

• KIMATH 

Chips with Listing 

• KIMEX-1 EXPANSION BOARD 

KIM-1 Plugable PROM, Ram and I/O Board 

• RS-232 ADAPTER 

For KIM-1 

• POWER SUPPLIES 

STANDARD MICROSYSTEMS 

• UART's • FLOPPY DISC DATA HANDLER 

• BAUD RATE GENERATORS *CRT CONTROLLERS 



FALK- BAKER 
ASSOCIATES 



382 FRANKLIN AVE • NUTLEY, NEW JERSEY 07110 
(201) 661-2430 

WRITE, CALL, OR RETURN OUR COUPON FOR CATALOGUE AND PRICE LISTS. 
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SYM-1 

Home 

Warning 

System 



A. M. MacKay 
600 Sixth Avenue West 
Owen Sound, Ontario 
N4K 5E7 

If you have a C.R.T. hooked up to 
your SYM-1, this program and a cou- 
ple of dollars worth of parts will let you 
experiment with a home warning 
system, and may help you learn a bit 
about your computer. 

Once the hardware shown in 
figures 1 to 3 is connected, load the 
program and hit "RUN START" if 
you have an assembler or G 200 CR if 
you don't. Then as long as the old 
homestead is devoid of marauders, 
catastrophes and other unthinkables 
your screen will steadily and quietly tell 
you that everything is O.K. However, 
if one or more of the sensors detects any 
of the aforementioned nasties, a siren 
sounds and a message flashes on the 
screen telling you the nature and loca- 
tion of the problem(s). 

The program starts by clearing the 
screen and displaying the 
"EVERYTHING IS O.K." message. 
It then polls the sensors, one at a time, 
beginning with PBO. As soon as it finds 
an active sensor, it clears the "O.K." 
message and displays the correct warn- 
ing, then checks the remaining sensors. 
When all sensors have been checked 
and messages have been displayed for 
all active sensors, the siren sounds once 
and the polling process is repeated. 
The warnings and the siren will con- 
tinue until all the sensors are turned 
off, at which time the 
"EVERYTHING IS O.K." message 
re-appears and polling of the sensors 
resumes. 

For this experiment four switches 
are used as input sensors. In practice, 
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0010 




»*«»»*»*»«*»»•»»***»***»*»«»****» 


0020 




*«***»»*»■»****»■*•**»»»■*•*•*»**«*«■»*« 


0030 




• •« 




»•** 


0040 




«*» 


HOME WARNING SYSTEM *•* 


0050 




#»♦ 


FOR SYM- 


-1 COMPUTER **« 


0060 




« # * 




*«* 


0070 




*»# 


BY A . M 


. MACKAY *** 


0080 




»«* 


600 SIXTH AVE. WEST *** 


0090 




*»» 


OWEN SOUND . ONTARIO *** 


0100 




»*» 


CANADA 


N4K 5E7 *** 


0110 




• *« 




«*« 


0120 




«##»»»*«»»»««**»***»***»*»*»***»* 


0130 




«■»«»»»■»*#•*»»*»#«•**»«*»*»****»»*» 


0140 










0150 










0160 




» » 


* DEFINITIONS 


170 










0180 


STATUS 


• DE 


SAC 




0190 


OUTVEC 


• DE 


SA663 




0200 


t 








0210 


J 


• • 


* INITIATE * * * 


0220 


i 








0230 


START 


LDA 


#$F0 


;SET DDRB 


0240 




LDA 


STATUS+2 


: FOR INPUT 


0250 




LDA 


#$00 


;turn OFF 


0260 




STA 


STATUS 


; SPEAKER 


0270 










0280 




* » 


* SENSOR 


POLL ROUTINE * * * 


0290 










0300 


CLEAR 


J MP 


OK 


;PRINT "ALL O.K." MESSAGE 


0310 


POLL 


LDA 


STATUS 


;look AT SENSORS 


0320 




AND 


#$0F 


; IF ONE IS ON 


0330 




BNE 


TESTl 


GO TO TESTl 


0340 




J MP 


POLL 


;ELSE GO TO POLL 


0350 










0360 




• • 


* SIGNAL 


PROCESSING ROUTINE * * * 


0370 










0380 


TEST1 


JSR 


POSIT 


JPOSITION MESSAGE ON SCREEN 


0390 




LDA 


STATUS 


;look at sensors 


0400 




AND 


#$01 


;mask off all but ist 


0410 




BEQ 


TEST2 


;NOT ON? GO TO TEST2 


0420 




JSR 


SPACE 


;ON? PROCESS SIGNAL 


0430 




LDX 


#0 


J INDEX FOR MESSAGE #1 


0440 


MESS1 


LDA 


TABIjX 


;GET CHARACTERS 


0450 




JSR 


OUTVEC 


/•WRITE ON CRT 


0460 




I NX 


J 


;next character 


0470 




CMP 


#$00 


;last one? 


0480 




BNE 


MESS1 


;no? get next 


0490 


TEST2 


LDA 


STATUS 


;yes? test for 


0500 




AND 


#$02 


; SENSOR #2 


0510 




BES 


TEST3 


ETC . 


0520 




jsr 


SPACE 




0530 




LDX 


#0 




0540 


MESS2 


LDA 


TAB2,X 




0550 




JSR 


OUTVEC 




0560 




I NX 






0570 




CMP 


#$00 




0580 




BNE 


MESS2 




0590 


TEST3 


LDA 


STATUS 


;test FOR 


0600 




AND 


#$04 


SENSOR #3 


0610 




BEQ 


TEST4 


; etc . 


62 




JSR 


SPACE 




63 




LDX 


#0 




0640 


MESS3 


LDA 


TAB3,X 




0650 




JSR 


OUTVEC 




0660 




INX 






0670 




CMP 


#$00 




0680 




BNE 


MESS3 




0690 


TEST4 


LDA 


STATUS 


;test for 
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LET THE FIRST MATE EASE your 
MICROCOMPUTER APPLICATIONS/TRAINING 

EXPERIMENTATION 



Mounted on the SYM-1*, the FIRST MATE pro- 
vides ready access to address, data and control 
busses, and up to 35 bits of I/O plus control lines. 
Designed to serve the interfacing/prototyping 
needs of students, hobbiests and practicing 
engineers, the FIRST MATE interfaces to the 




SYM-1 Expansion (E), Application (A) and 
Auxiliary Application (AA) connectors via one 
to three SECOND MATEs and 40-conductor 
ribbon cables. The I/O and bus lines are available 
at the onboard socket strip. Space is provided 
for up to three additional socket strips. The 
FIRST MATE is electrically compatible with the 
KIM-1* and AIM-65* microcomputers. 
Available from MicroMate, P.O. Box 50111, 
Indianapolis, IN 46256. 

MM-1 The FIRST MATE plus one SECOND MATE 
and one 40-conductor ribbon cable . .$87.50 

MM-2 Additional SECOND MATE $15.00 

MM-3 Additional 40-conductor ribbon cable $10.00 



ColorMate by MicroMate 
available 3rd qtr. 1980 • KIM, SYM, AIM compatible 
based on Motorola 6847 video display generator 
applications range Irom two-page alphanumeric/semi-graphic 
terminal to lull graphics mode • write for Iree details. 



Add 2% lor shipping to continental U.S.A. Others add 10%. Indiana residents add 4% sales tax. 
'SYM-1 is a product ol Synertek Systems Corp. KiM-1 is a produrt ol MOS Technology AIM-65 is a product ol Rockwell International 



COMPUTE'S BOOK CORNER 

We Now Have One of the 
Best Collections of 6502 
Resource Materials Around: 



SOFTWARE 



MACHINE LANGUAGE PROGRAMS '00: 



PET 'APPLE 'OSI & ANV S502 SYSTEM 



Best of The PET Gazette 

Collected PET User Notes 
Volume 1, Issues 2-7 

Volume 2, Issue 1 

All 7 Issues 

6502 User Notes 

Volume 1, Issues 1 -6 
Volume 2, Issues 1 - 6 
Volume 3, Issues 1 - 5 

All 1 7 Issues 



FOLIO A FILE ORIENTED LANGUAGE - A PSEUDO-CODE INTERPRETER • SUPPORTS ?7 

FUNCTIONS WHICH SIMPLIFY DATA HANDLING • SU^ORTS FILES WITH UP TO 254 RECORDS 
WITH UP TO 254 FIELDS WITH UP TO 80 CHARACTERS • FIELD SIZE IS VARIABLE FROM One 

record to another • built-in key sort function • folio interpreter occupies only 
1 25k ram or rom ■ typical folio programs t»*e less than ik • does *0t_ require 

BASIC, CP/U , 1 CBASIC*. 48K OR DISKS • WITH USER'S manual, OROGRAwmeR'SIjANUAL 
COMMENTED source listing 



$10.00 



$9.00 

$1.50 
$10.00 

$ 6.00 
$ 6.00 
$10.00 

$20.00 




, 525.00 



FOLIO PROGRAMS: 



FILE CABINET a mult I -Pl*P0S6 data STORAGE 
0NL» TAKES 120 BYTES • MENU DRIVEN • SELECT RECORDS KEYE0 BY 
CHOICE OF REPORT FORMATS • USE FOR MAILING LIST, 



RETRIEVAL PROGRAM 

NY FIELD • SORT • 

NveNTORV, EMPLOYEE DAT*. ETC • 



r 



BUDGET FOR HOUSEHOLD BUDGET PLANNING ■ PRINTS A 12 MONTH ACCOUNTING WITH 
UP TO 26 E'PENSE OR INCOME ITEMS WITH MONTHLY TOTALS ANO BALANCE • MENU DRIVEN • 
EASY TO CHANGE ITEM NAMES OR AMOUNTS • RE0UIRES 64 OR 72 CHARACTER LINE TERMINAL 

CHECKBOOK ENTER CHECKS AS YOU wOulO IN YOUR CHECK REGISTER PLUS A 

C00E NUMBER FOR UP TO 256 CATEGORIES SUCH AS -FOOO", -MEDICAL*. ETC. • PRINTS THE 
STATEMENT WITH RUNNING BALANCE FOR SELECTEO 0ATES OR IN NUMERICAL ORDER • PRINTS 
ANO TOTALS CHECKS WITH SELECTEO CODE * - FOR SELECTED OATES • PRINTS CODE TOTALS 

EACH FOLIO APPLICATION PROGRAM COMES WITH THE FOLIO USER'S MANUAL, APPLICATION 
PROGRAM USER'S MANUAL. ANO A h£X OUVP OF FOLIO AND THE PROGRAM J1O.0O 



10THER 



6502 



PROGRAMS:: 



MC/VISA Accepted 

Add $2.00 shipping & handling 

COMPUTE, P.O. Box 5119, Greensboro, NC 27403 



TEA tiny EDITOh/ASSEUBLER • CHARACTER ORIENTED EDITOR • SiNOLE PASS ASSEMBLER 

• may 9£ USED SEPARATELY TO CONSERVE RAM ■ IK EaChI • CLOSEL* USES mOS mn£uOniCS 

• COMES WITH USER'S manual anO COmmEnTEO SOURCE LJSTinG 520.00 

DISASSEMBLER 3is:mav$ y.uiO. : AH?; S 1\C O^OANOS =R0M SYMBOL 
TABLE GENERATED 9Y TEA (ABOVE) • OR 0ISPLAYS A0DRESS VALUE • CREAT FOR DEBUGGING 
MACHINE CODE • WITH USER'S MANUAL AND COMMENTED SOURCE LISTING S10.00 

ROBOT INTERACTIVE PROGRAMMING LANGUAGE TO CONTROL ROBOT. PLOTTER OR CRT 
CURSOR • USER DEFINED COMMANDS 4 COMMAND SUBROUTINES • COMES WITH CRT ROUTINES 
WITH USER'S MANUAL AND COMMENTED SOURCE LISTING l'.5K) S 5.00 



MUSIC 



INTERACTIVE PROGRAMMING LANGUAGE FOR THE CREATION OF PATTERNS OF 
SOUND "MUSIC" • A COMPOSITION TOOL • NOT A NOTE TABLE COMPILER OR "PIANO ROLL" • 
"uPl£* Hi£JAaCHl£$ OF USER DEFINED FUNCTIONS - STRINGS OF MUSICAL EVENTS, WHICH 
CAN BE CALLED LIKE SUBROUTINES. ALLOW THE PROGRAMMING OF SURPRISINGLY INTRICATE 
COMPOSITIONS • WITH USER'S MANUAL * COMMENTED SOURCE LISTING S10.00 



ALL PROGRAMS WORK IN A 4K SVSTEM • MANUALS CONTAIN INSTRUCTIONS FOR MODIFICATION 
USER EXTENSION, RELOCATION, ANO INPUT & OUTPUT INTERFACING FOR 6502 PROGRAMMERS 



CASSETTE TAPE 
ORDER FROm: 



•hVPERTAPE") - 
IICHAEL ALLEN: 



6025 KIUBARK: 



ILLINOIS 60637 
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any sensor that will put out 5V under 
the appropriate conditions will do the 
job, and the program can be extended 
to handle any reasonable number of 
sensors. 

The program as written uses PBO 
to PB3 of U29 as inputs, and PB7 with 
its buffer as the speaker output. Figure 
1 shows how to hook up buffer B7 for 
this application. Although it looks com- 
plicated, changing B7 is easy. All you 
have to do is remove one jumper wire 
and add two resistors and one diode. 
However, if you prefer, you can forget 
about buffer B7 and construct a similar 
speaker system externally. Again, in 
real life, PB7 would be connected to a 
large amplifier and speaker. 

Figure 2 shows how to attach the 
speaker, and figure 3 shows one way to 
use switches as simulated sensors. The 
speaker volume control, VR1, is op- 
tional, but it's a good idea to use it 
because without it the siren can shatter 
your wife's teeth. 

The messages should, of course, 
be changed to suit your particular ap- 
plication. If you have an assembler 
such as RAE, this is easy. If not, you 
will have to get an ASCII code table 
and substitute the message code as re- 
quired. The messages shown in the 
listing are for a 64x16 screen, so if 
yours is different, change the number 
of "0A"'s and "20"'s to suit your re- 
quirements. 

Sound is produced by toggling the 
speaker on and off, with a delay bet- 
ween the toggles. The length of the 
delay determines the frequency. The 
siren sound is produced by shortening 
the delay slightly each time the speaker 
toggles, thus giving a steadily increas- 
ing frequency. For more information 
on sirens and other experiments read 
Rodnay Zak's "6502 Application 
Book" published by Sybex. 

This program uses the SYM-1 as a 
dedicated con troller, so it can't be used 
for other purposes while the program is 
running. If you want the warning 
system working while you use your 
SYM-1 for other things, a new pro- 
gram using interrupts must be written. 
But that's another ballgame. 



0700 




AND 


#$08 


SENSOR #4 


0710 




BNE 


LAST 


; ETC . 


0720 




JMP 


MESSX 




73 


LAST 


JSR 


SPACE 




74 




LDX 


#0 




0750 


MESS4 


LDA 


TAB4/X 




0760 




JSR 


OUTVEC 




0770 




I NX 






0780 




CMP 


#$0 




0790 




BNE 


MESS4 




0800 




J MP 


SIREN 




0810 


MESSX 


LDA 


STATUS 


;test FOR 


0820 




AND 


#$0F 


; ANY SENSORS 


0830 




BEQ 


AGAIN 


;IF NONE, BACK TO POLL 


0840 




JMP 


SIREN 


;else sound siren 


0850 


OK 


JSR 


POSIT 


;position 


0860 


AGAIN 


LDX 


#0 


MESSAGE 


0870 


ALLOK 


LDA 


TAB5/X 


/'DISPLAY 


0880 




JSR 


OUTVEC 


; "EVERYTHING O.K." 


0890 




I NX 


» 


MESSAGE 


0900 




CMP 


#$00 




0910 




BNE 


ALLOK 




0920 




LDA 


#$00 


;turn OFF 


0930 




STA 


STATUS 


; SPEAKER AND 


94 




JMP 


POLL 


RESUME POLLING 


0950 


j 








0960 


/ 


» * 


* SIREN 


ROUTINE * * » 


0970 


t 








0980 


SIREN 


LDA 


STATUS 


;any SENSOR 


0990 




AND 


#$0F 


STILL ON? 


1000 




STA 


*$CB 


/IF YES* STORE IT 


1010 




BNE 


SCREAM 


; AND START ALARM 


1020 




JMP 


CLEAR 


;ELSE POLL AGAIN 


1030 


SCREAM 


LDA 


#$68 


^•FREQUENCY CONSTANT 


1040 




STA 


*$CA 


; AT LOCATION $CA 


1050 


YLOOP 


LDY 


#$07 


; DELAY CONSTANT 


1060 


SHRIEK 


JSR 


SPKR 


JTOGGLE SPEAKER 


1070 




DEY 






1080 




BNE 


SHRIEK 




1090 




INC 


•$CA 


/•INCREMENT 


1 100 




LDA 


♦$CA 


; FREQ. CONSTANT 


1110 




CMP 


#$B0 


/HIGHEST CONST. = $B0 


1 120 




BNE 


YLOOP 




1 130 




LDA 


STATUS 


/'ANY 


1 140 




AND 


#$0F 


SENSOR 


1 150 




CMP 


*$CB 


; CHANGE? 


1 160 




BEQ 


SCREAM 


/'NO? KEEP SIREN GOING 


1170 




LDA 


STATUS 


/'YES? ANY MORE 


1 180 




AND 


#$0F 


i SENSORS ON? 


1 190 




BEQ 


SCREEN 


;NO? PRINT O.K. MESSAGE 


1200 




JMP 


POLL 


/•YES? PROCESS AGAIN 


1210 


SCREEN 


JMP 


CLEAR 




1220 


' 








1230 


J 


• • 


* SUBROUTINES * * » 


1240 


» 








1250 


SPKR 


LDA 


#$80 


;reset 


1260 




STA 


STATUS+2 


: DDRB AND 


1270 




STA 


STATUS 


TOGGLE SPEAKER 


1280 




JSR 


DELAY 


/'WAIT AND 


1290 




LDA 


#$00 


/• TOGGLE 


1300 




STA 


STATUS 


; AGAIN 


1310 




JSR 


DELAY 


/WAIT AGAIN 


1320 




RTS 






1330 


DELAY 


LDX 


*$CA 


/•CHANGE 


1340 


XLOOP 


I NX 


» 


FREQUENCY 


1350 




CPX 


#$00 




1360 




BNE 


XLOOP 




1370 




RTS 






1380 


POSIT 


LDX 


#0 
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1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
164 
1650 
1660 
1670 
1680 
1690 
1700 
ft 



MOVE 



SPACE 
RIGHT 



TA31 
TAB2 
TAB 3 
TAB4 

TAB5 



TAB 6 
TAB 7 



LDA 
JSR 
I NX 
CMP 
BNE 
RTS 
LDX 
LDA 
JSR 
I NX 
CMP 
BNE 
RTS 



TAB6..X 
OUTVEC 
S 

#soo 

MOVE 

#0 

TAB7..X 

OUTVEC 

#$00 
RIGHT 



MESSAGES « * * 



;position 

; MESSAGE 
ON 

SCREEN 



POSITION 
WARNING 

MESSAGES 



Parts List For SYM-1 Home Warning 
System. 

R4 100K Resistor 

R17 10 Ohm Resistor 

R18 IK Resistor 

VR1 100 Ohm Potentiometer (Optional) 

CI 0.01 UF Capacitor 

CR4 Diode, 1N4148, 1N914 Or Equivalent 

SW1-4 Any SPDT Switches 

SPKI 8 Ohm Speaker, RS 40 -247 Or 

Equivalent 



• BY 


'C c c 


.BY 


♦+ + + 


.BY 


'# t t 


.BY 


»» * » 


.BY 


»♦ * * ' 


.BY 


»»*#»»» 


.BY 


«••*••• 


.BY 


»* * # 


.BY 


»* # * » 


.BY 


*> > > 


.BY 


'< < < ' 


• BY 


»»#»»** 


.BY 


$0C SOD 


.BY 


SOD S0A 


• BY 


S20 S20 


• EN 





WATER IN BASEMENT ] ] J ' $00 
DOG NEEDS TO GO OUT + + +' $0 
THIEF IN WINE CELLAR # # *' S00 
MILKMAN IN WIFE'S BEDROOM ' 

S00 

*' SOD $0A $0A 

SYM-1 HOME WARNING SYSTEM ' 

SOD S0A $0A 
> EVERYTHING IS O.K. < * 

SOD $0A $0A '*•*****' 
*«•»***««*•*••**«*******»» $00 

$0A $0A SUA SUA $00 
$0A $20 $20 $20 $20 $20 
$00 




PB7- 

Pad A 1 K 



Pad 12 



Changes to Buffer B7 
See P. 4-12 & 4-13 
Sym-1 Reference Manual 



Pin AA-22 



V.VR1 (optional) 
Volume Control 



n Pin AA-A 
♦5 V 



Pin AA-A 
+5 V 

"18 



Pin AA-16 



SW1 o_ 



TWT 



Pin AA-T 



PB1 



Pin AA-15 



^ I 



SW3o- 



PB2 



Pin AA-S 



SW4o- 



PB3 



Pin AA-1 * 
Ground ~~ Q_ 



FIGURE 3 



Switch (sensor) Connections 



SPKI 



FIGURE 2 



Speaker Connections 
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MICROCOMPUTER MEASUREMENT and 



PETMOD 



cL 



D 





RS 232 
PRINTER 



RS-232 INTERFACE 



PET INTERFACE 

KIMMOD {/ 



fe\CABLE A g t 



cnn en 



KIM INTERFACE 



o~i [ 





-0= 



MANIFOLD 
MODULE 




TRS-80M0D 



TRS-80 INTERFACE 



«-""~ 1 APMOO 

APPLE INTERFACE 




EXPANDER 
MODULE 



REMOTE 

CONTROLLER 



SENSORS 

• TEMPERATURE 

• LIGHT LEVEL 

• PRESSURE 

• pH 

• HUMIDITY 

• ACCELERATION 

• SOUND 

• ETC... 

REMOTES 

• APPLIANCES 

• LIGHTS 

• MOTORS 

• PUMPS 

• ALARMS 

• HI-FIS 

• TELEVISIONS 

• HEATERS 

• FANS 

• ETC... 



The world we live in is full of variables we 
want to measure. These include weight, 
temperature, pressure, humidity, speed and 
fluid level. These variables are continuous 
and their values may be represented by a 
voltage. This voltage is the analog of the 
physical variable. A device which converts 
a physical, mechanical or chemical quanti- 
ty to a voltage is called a sensor. 

Computers do not understand volt- 
ages: They understand bits. Bits are digital 
signals. A device which converts voltages 
to bits is an anaiog-to-digital converter. 



Our AIM 16 (Analog Input Module) is a 16 
input analog-to-digital converter. 

The goal of Connecticut microcompu- 
ter in designing the uMAC SYSTEMS is 
to produce easy to use, low cost data 
acquisition and control modules for small 
computers. These acquisition and control 
modules will include digital input sensing 
(e.g. switches), analog input sensing (e.g. 
temperature, humidity), digital output con- 
trol (e.g. lamps, motors, alarms), and 
analog output control (e.g. X-Y plotters, or 
oscilloscopes). 



Connectors 





The AIM 16 requires connections to its 
input port (analog inputs) and its output 
port (computer interface). The ICON (Input 
CONnector) is a 20 pin, solder eyelet, edge 
connector for connecting inputs to each of 
the AIM16's 16 channels. The OCON 
(Output CONnector) is a 20 pin, solder 
eyelet edge connector for connecting the 
computer's input and output ports to the 
AIM16. 

The MANMOD1 (MANifold MODule) 
replaces the ICON. It has screw terminals 
and barrier strips for all 16 inputs for 
connecting pots, joysticks, voltage 
sources, etc. 

CABLE A24 (24 inch interconnect cable) 
has an interface connector on one end 
and an OCON equivalent on the other. This 
cable provides connections between the 
uMACSYSTEMS computer interfaces and 
the AIM 16 or XPANDR1 and between the 
XPANDR1 and up to eight AIM 16s. 



Analog Input Module 




I 



The AIM 16 is a 16 channel analog to digital 
converter designed to work with most 
microcomputers. The AIM16 is connected 
to the host computer through the compu- 
ter's 8 bit input port and 8 bit output 
port, or through one of the uMAC SYS- 
TEMS special interfaces. 

The input voltage range is to 5.12 
volts. The input voltage is converted to a 
count between and 255 (00 and FF hex). 
Resolution is 20 millivolts per count. Ac- 
curacy is 0.5% ± 1 bit. Conversion time 
is less than 100 microseconds per channel. 
All 16 channels can be scanned in less than 
1.5 milliseconds. 

Power requirements are 12 volts DC at 
60 ma. 

The POW1 is the power module for the 
AIM16. One POW1 supplies enough power 
for one AIM16, one MANMOD1, sixteen sen- 
sors, one XPANDR1 and one computer in- 
terface. The POW1 comes in an American 
version (POW1a) for 110 VAC and in a 
European version (POW1e) for 230 VAC. 



TEMPSENS 




This module provides two temperature 
probes for use by the AIM16. This 
module should be used with the MANMOD1 
for ease of hookup. The MANMOD1 will 
support up to 16 probes (eight TEMP- 
SENS modules). 

Resolution for each probe is 1°F. 



XPANDR1 

The XPANDR1 allows up to eight Input/ 
Output modules to be connected to a com- 
puter at one time. The XPANDR1 is 
connected to the computer in place of the 
AIM16. Up to eight AIM16 modules are 
then connected to each of the eight 
ports provided using a CABLE A24 for 
each module. Power for the XPANDR1 
is derived from the AIM16 connected 
to the first port. 




August /September. 1980. Issue 3. 



compute II. 



CONTROL for PET, Apple, KIM, and AIM 



ja 



Computer Interfaces 
and Sets 




For your convenience the AIM16 comes as 
part of a number of sets. The minimum 
configuration for a usable system is the 
AIM16, one POW1, one ICON and one 
OCON. The AIM16 Starter Set 2 includes 
aMANMODI in place of the ICON. Both 
of these sets require that you have a 
hardware knowledge of your computer 
and of computer interfacing. 

For simple plug compatible systems 
we also offer computer interfaces and sets 
for several home computers. 



INTRODUCING 
SUPER X-10 MODULE 
Open a door or window and turn on a 
light, tape recorder, alarm! 

Control lab equipment. CLOSE THE 
LOOP on the real world. 

AN INEXPENSIVE CONTROL 
SOLUTION FOR 

HOME SECURITY 
ENERGY CONSERVATION 

GREENHOUSES 
ENVIRONMENTAL CONTROL 
INDUSTRIAL CONTROL 

LABORATORIES 

SUPER X-10 MOD SPECS 

1. Remote controller 

Controls up to 256 different remote 
devices by sending signals over the 
house wiring to remote modules. Uses 
BSR remote modules available all over 
the USA (Sears, Radio Shack, etc.). 
Does not require BSR control module. 
Does not use sonic link. 

2. Clock/calendar 

Time of day - hours, minutes, seconds 
Date - month, day • automatically cor- 
rects for 28,29,30 and 31 day months. 
Day of the week. 

3. Digital inputs/outputs 

8 inputs - TTL levels or switch closures. 

Can be used as triggers for stored 

sequences. 
8 outputs - TTL levels 






CON 



— <t 



PLUS: CLOCK, CALENDAR, 
REMOTE SEQUENCE TRIGGERS 



AIM16 (16 channel-8 bit Analog 

Input Module) 179.00 

P0W1a(POWermodule-110VAC) 14.95 

P0W1e (POWer module-230 VAC) 24.95 

ICON (Input CONnector) 9.95 

OCON (Output CONnector) 9.95 

MANMOD1 (MANifold MODule) 59.95 
CABLE A24 (24 inch Interconnect 

cable) 19.95 
XPANDR1 (allows up to 8 Input or 

Output modules to be connected to a 

computer at one time) 59.95 
TEMPSENS2P1 (two temperature probes, 

•10>Fto160°F) 49.95 

LIGHTSENS1 P1 (light level probe) 59.95 

The following sets include one AIM16, 
one P0W1, one OCON and one ICON. 
AIM16StarterSet1a(110VAC) 189.00 

AIM16 Starter Set 1e (230 VAC) 199.00 

The following sets include one AIM 16, 
one P0W1, one OCON and one MANMOD1. 
AIM16 Starter Set 2a (110 VAC) 239.00 

AIM16 Starter Set 2e (230 VAC) 249.00 

The following modules plug into their 
respective computers and, when used 
with a CABLE A24, eliminate the need for 
custom wiring of the computer interface. 
PETMOD (Commodore PET) 49.95 

KIMMOD(KIM,SYM,AIM65) 39.95 

APMOD (APPLE II) 59.95 

TRS-80 MOD (Radio Shack TRS-80) 59.95 



lD» 

SYSTEMS 

Order Form 



CONNECTICUT microCOMPUTER , Inc. 

150 POCONO ROAD 
BROOKFIELD, CONNECTICUT 08804 

TEL: (2031 775-9659 TWX: 710-456-0052 



The following sets include one AIM16, 

one POW1, one MANMOD1, one CABLE 

A24 and one computer interface module 

PETSETIa (Commodore PET • 

110 VAC) 295.00 

PETSETIe (Commodore PET • 

230 VAC) 305.00 

KIMSETIa (KIM, SYM, AIM65 ■ 

110 VAC) 285.00 

KIMSETIe (KIM, SYM, AIM65 - 

230 VAC) 295.00 

APSET1a(APPLEII-110VAC) 295.00 

APSETIe (APPLE II -230 VAC) 305.00 

TRS-80 SET1a (Radio Shack TRS-80 - 

110 VAC) 295.00 

TRS-80 SET1e (Radio Shack TRS-80 - 

230 VAC) 305.00 




■■"-■' i ....!.r;, 



4. Computer interfaces 

S-100: Requires one 8-bit input port and 

one 8-bit output port. 

Requires cable assembly. 

PET, APPLE, TRS-80, KIM, SYM, AIM65: 

Plug-in sets available - no cable assembly 

required. 

Other: same as S-100 

5. Self-contained module in metal case with 
its own power supply. Physical size 
approximately 5X6X2. 

Price (until April 30, 1980): $199.00 (S-100), 
$249.00 (other) 

All prices and specifications subject to 
change without notice. Our 30-day money 
back guarantee applies. 



OUANTITY 


DESCRIPTION 


PRICE 


TOTAL 


































































































SUBTOTAL 




Handling and shipping — add per order 


$300 


Foreign orders add 10% tor AIR postage 




add 7% sales tax 




TOTAL ENCLOSEO 





NAME 

COMPANY. 
ADDRESS - 



CITY 

STATE 

VISA O M/C O 
Card number 



-ZIP — 



Expiration date . 
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A Digital 

Cardiotachometer 
Implemented With The AIM 65 



Marvin L. De Jong 

Department of 

Mathematics-Physics 

The School of the Ozarks 

Pt. Lookout, MO 65726 



The circuit shown in Figure 1 and the computer pro- 
gram given in the listing may be used to measure the 
pulse (heartbeat) rate of a person and display this result 
(in heartbeats per minute) on the AIM 65 display. A 
modified version of a PASCO Photo-Plethysmograph 
(PASCO Scientific, 1933 Republic Avenue, San 
Leandro, CA 94577) was used to detect the pulses. You 
might be able to build your own photo-plethysmo- 
graph using suitable infared photodiodes and photo- 
transistors (such as the Fairchild FPA106 array) for 
a lot less money, but be prepared to do some experi- 
mentation. The voltage fluctuation from the plethys- 
mograph is amplified by an instrumentation amplifier. 
We used an Analog Devices (Route 1 , Industrial Park, 
P.O. Box 280, Norwood, MA 02062) AD521. The 
negative pulses from the AD521 are fed to a 555 timer 
that acts as a Schmitt trigger circuit, producing a 
well-defined square pulse at the clock input of the 
74LS74. The LED will turn off when a pulse is 
detected. In the circuit of Figure 1, the 2000 
ohm potentiometer on the AD521 controls the gain, 
and it should be adjusted so that heartbeats cause the 
LED to flash. An osciolloscope is very useful for 
making circuit adjustments. 

The time interval between two successive pulses to 
the clock input of the 74LS74 is measured by the 
computer, and this result is converted to heartbeats 
per minute. The Tl timer on the 6522 on the AIM 65 
microcomputer is used to produce a train of pulses 
that are fed to one input of the 74LS00 NAND gate, 
the period of these pulses is 100 microseconds. The 
leading edge of the heartbeat pulse at the clock input 
of the 74LS74 flips the Q output to logic one, gating the 
pulses from PB7 onto PB6 where the T2 counter/timer 
on the 6522 counts them. They are counted until the 
leading edge of the next heartbeat pulse flops the Q. 
output to logic zero, closing the gate. Thus, the 
computer contains the number of 100 microsecond 
pulses that occurred between two heartbeats. Since f = 
1/T where f is the frequency of the heartbeats and T is 
the time interval between beats, then f = 10 /N where 
N is the number of pulses counted by the T2 counter/ 
timer. Changing the units to pulses per minute gives 
f = 60 X 10/N. 

We first describe the machine language subrou- 
tine called by the BASIC program. The instructions 
from $0E00 to $0E30 merely initialize the various 
6522 registers. For example, Tl must produce a pulse 
train on PB7 and T2 must count pulses. A positive 



transition on CB1 must set a flag, while reading 
Port B produces a one microsecond pulse on CB2, 
clearing the flip-flop. Starting with the instruction 
at $0E30, the D-input of the flip-flop is set at logic 
one. Since the flip-flop was previously cleared, its out- 
put is currently at logic zero on the Qpin. The first 
heartbeat pulse reaching the flip-flop clock input sets 
the Q output to logic one. This transition is also de- 
tected by the instructions at $OE37 through S0E39, 
and as soon as it occurs, the program begins to 
watch the pulse count on T2. 

Before switching the D-input of the flip-flop to 
logic zero in order to turn the gate off when the next 
heartbeat pulse arrives, the T2 counter is watched to 
allow approximately one-half a heartbeat period to 
elapse. It waits 0.0244 s to be exact (you may wish to 
decrease the value of the byte at $0E44). The reason 
for waiting lies in the fact that the waveshape of the 
heartbeat pulse (at lease mine) has a secondary peek 
that can trigger the flip-flop if the gain is set a bit 
too high. So, we wait until this secondary pulse has 
been completed before catching the next heartbeat 
pulse. Bringing the D-input to logic zero allows the 
next clock pulse to switch Q,to logic zero, closing the 
gate. The number of counts in T2 is obtained, and if 
T2 counted through zero, producing an interrupt 
(IRQ) request, the number of interrupts (counts ex- 
ceeding 65536) are also obtained. 

The BASIC program calls the machine language 
subroutine which then measures the number of 100 
microsecond intervals between heartbeats. The BASIC 
program merely converts this number to a fre- 
quency and displays the result. Finally, it returns to 
measure another heartbeat period. Note that because 
of various time delays in processing the data, only 
every other heartbeat interval is measured. 

I would not recommend that a novice experi- 
menter with very little test equipment attempt to build 
this circuit. A number of adjustments are necessary 
and things like fluorescent lights can cause problems 
with the plethysmograph, in particular they can pro- 
duce a 120 cycle modulation that triggers the circuit. 
The circuit does make a nice electronics project, and I 
am sure that improvements are possible. Of course, the 
circuit and the program are meant to be used for 
instructional purposes rather than in actual 
medical applications. 

Besides being useful in teaching some simple bio- 
medical instrumentation, this program and circuit 
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microsystems 



P.O. Box 687 

224 S.E. 16th Street 

Ames, Iowa 50010 

TWX 910-520-1 166 



Dflim 




DAIM is a complete disk operating system for the ROCKWELL INTERNATIONAL 
AIM 65. The DAIM system includes a controller board (with 4K operating system in 
EPROM) which plugs into the ROCKWELL expansion motherboard, packaged power 
supply capable of driving two 5 1 /4 inch floppy drives and one or two disk drives mounted 
in a unique, smoked plastic enclosure. DAIM is completely compatible in both disk format 
and operating system functions with the SYSTEM 65. Commands are provided to 
load/save source and object files, initialize a disk, list a file, list a disk directory, rename 
files, delete and recover files and compress a disk to recover unused space. Everything is 
complete - plug it in and you're ready to go! DAIM provides the ideal way to turn your 
AIM 65 into a complete 6500 development system. Also available are CSB 20 
(EPROM/RAM) and CSB 10 (EPROM programmer) which may be used in conjunction 
with the DAIM to provide enhanced functional capability. Base price of $850 includes 
controller board with all software in EPROM, power supply and one disk drive. Now you 
know why we say — 



There is nothing like a 

Dflim 
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might be useful for experiments on factors that 
alter the heartbeat rate. What about that last cup of 
coffee you drank? Can you exert control over your 
pulse rate with your mind? What is the cause of 



the statistical fluctuation in heartbeat rates when 
a person is simply relaxed? What happened to your 
heartbeat rate when that pretty girl walked by? 



DIGITAL CARDIOTACHOMETER PROGRAM 

10 POKE 04,00; POKE 05,14 

20 Y = USR(0) 

30 X = 65536 *PEEK(51) + 256* PEEK(50) + PEEK(49) 

40 R = 600000/X x 

50 R = INT(R + .5) 

60 PRINT R; "PULSES/MIN" 

70 GO TO 20 

80 END 



0E00 A9 B0 START 


LDA $B0 


0E02 8D 0C AO 


STA PCR 


0E05 A9 81 


LDA $81 


0E07 8D 02 A0 


STA DDRB 


0E0A 8D 00 A0 


STA PBD 


OEOD CE 00 AO 


DEC PBD 


0E10 A9 E0 


LDA $E0 


0E12 8D 0B A0 


STA ACR 


0E15 A9 AO 


LDA SAO 


0E17 8D0E AO 


STA IER 


0E1A A9 30 


LDA S30 


0E1C 8D 06 AO 


STA TILL 


0E1F A9 00 


LDA $00 


0E21 8D 05 AO 


STA T1LH 


0E24 A9 00 


LDA 800 


0E26 85 33 


STA PLSHI 


0E28 A9 FF 


LDA $FF 


0E2A 8D 08 AO 


STA T2LL 


0E2D 8D 09 AO 


STA T2CH 


0E30 EE 00 AO 


INC PBD 


0E33 58 


CLI 


0E34 AD OD AO WAIT 


LDA IFR 


0E37 29 10 


AND $10 


0E39 FO F9 


BEQ WAIT 


0E3B A9 00 


LDA $00 


0E3D 8D OC AO 


STA PCR 


0E40 AD 09 AO LOAF 


LDA T2CH 


0E43 C9 F4 


CMP $F4 


0E45 BO F9 


BCS LOAF 


0E47 CE 00 AO 


DEC PBD 


0E4A AD OD AO LOITER 


LDA IFR 


0E4D 29 10 


AND $10 


0E4F FO F9 


BEQ LOITER 


0E51 A9 FF 


LDA $FF 


0E53 38 


SEC 


0E54 ED 08 AO 


SBC T2CL 


0E57 85 31 


STA PLSLO 


0E59 A9 FF 


LDA $FF 


0E5B ED 09 AO 


SBC T2CH 


0E5E 85 32 


STA PLSMI 


0E60 78 


SEI 


0E61 4C Dl CO 


JMP BASIC 


INTERRUPT ROUTINE: SET 


IRQ VECTOR TO $• 


0E65 48 INTRPT 


PHA 


0E66 A9 FF 


LDA $FF 


0E68 8D 09 AO 


STA T2CH 


0E6B 38 


SEC 


0E6C D8 


CLD 


0E6D A9 00 


LDA $00 


0E6F 65 33 


ADC PLSHI 


0E71 85 33 


STA PLSHI 


0E73 68 


PLA 


0E74 40 


RTI 



Initialize PCR on (he 6522. CB 2 in output 

pulse mode. Transition on CB1 sets flag. 

Initialize DDRB so PB0 and PB7 are output 

pins. 

Set PBO and PB7 to logic one. 

Make D-input on flip-flop logic zero. 

Set up ACR so Tl is in free-running mode 

and T2 counts pulses. 

Set up IER so T2 produces interrupts when 

it counts through zero. 

Set period of pulse train from PB7 to be 

100 microseconds. 

Start pulse train from PB7. 

Clear interrupt counter. 

This location contains number of interrupts. 

Initialize the T2 counter to count down 

from $FFFF. 

Set D-input to logic one. Next pulse from 
plethysmograph will start liming. 
Check flag to see if timing has started. 
Mask all except bit four of the IFR. 
Loop here until a pulse starts the timing. 
Clear PCR to prevent clearing the 74LS74. 

Read the timer. Wait here until about 

one-half the pulse period has passed 

before setting D-input to logic zero 

at the next pulse. 

Read the flag register. Has the next 

pulse occurred? 

No. Then wait here. 

Yes. Then count the pulses that have 

occurred (from PB7 to PB6). 

Low order byte of PB7 pulse count. 

Get middle byte of PB7 pulse count. 

PLSHI, PLSMI, and PLSLO are read by the 

BASIC program. 

Return to BASIC program. 

)65 

Save accumulator on the stack. 
Restart T2 by reloading it. 

Now increment the interrupt counter, PLSHI. 



Result into PLSHI. 

Recall accumulator contents. 

Return to the machine language subroutine. 



August/September. 1980. issue 3. 



compute II. 



35 



Figure 1. 

Interface circuit for the digital cardiotachometer. 

• +12V 0+ 12V 



O +5V 




AIM -65 
COMPLETE SYSTEM UPGRADING 



FLOPPY CONTROLLER BOARD 

• +5 Volts only 

• 4 single/double sided drives, 8 heads 

• Single or double density under software control 

• Dynamic allocation of files 

• Buffered sector and block transfer modes for fast transfer 

FP-950 controller board $475 
ADOS operating system on a 2532 EPROM $100 
Disk drive with power supply and case s/sided $375 

d/sided $460 

• 35.40 or 77 track side 

• Independent motor ON/OFF control for 4 drives 

• Powerful ADOS operating system have all necessary 
commands and file management. Full interface to AIM-65 
basic, editor, assembler and monitor. 

VIDEO CONTROLLER BOARD 

• 80,64 or 40 character by 25 lines 

• 2K bytes of software on board fully interfaced to 
AIM-65 with full cursor control 

• Reverse video on character basis 
CRT-80 video controller $295 

• 2K refresh RAM not on address space of CPU with 
no wait states whem updating. 

• Cpper/lower case ASCII plus 128 semigraphic characters 

• Combined and separated video outputs 



MEMORY BOARDS 

• +5 Volts only 

• Totally transparent refresh, no cycle stealing 
MB-16K 16 K bytes board $305 

MB-32K 32 K bytes board $375 
MB-48K 48 K bytes board $445 
MB-64K 64 K bytes board $515 

• Memory selectable in 4k blocks by switches 

• Bank selection 

EXPANSION MOTHER BOARD 

• Enabled in 4K increments by switches 

• Straight extended from the expansion connector on the 
AIM-65 

• Fully buffered 

• 6 slots 

• Supports DMA 

EMB-6 expansion board $ 195 

OEM discounts • All boards fully assembled and tested 
• All boards are compatible with the EXORciser bus. 

APPLIED BUSINESS COMPUTER CO. 

707 S. State College., Suite G. 
Fullerton, Ca. 92631 Tel. (714) 871-141 1 
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Saving Data 
Matrices With 
Your SYM-1 

George Wells 

This article describes a machine-language program 
that enables BASIC data matrices to be saved on 
cassette tape and loaded back into the computer at a 
later time. There have already been several attempts to 
perform this function, but most of them suffer in one 
or more of the following ways: 

1 . They will not allow the BASIC program to be 
modified. 

2. They will not allow the BASIC data to be 
loaded into a different program. 

3. They will not allow selected data to be saved 
on tape. 

4. They will not allow string data to be saved on 
tape. 

5. They are clumsy to use, requiring PEEKing 
and POKEing. 

The program described here overcomes all of these 
problems. It will run only on a SYM-1 with the new 
MONITOR 1 . 1 ROM and will require extensive 
modification to enable it to run on other machines. 
Functional Description Of Program 
After the machine-language program is in memory and 
BASIC is running, all that is required to save a matrix 
is a statement of the form: 

MATRIX (1,2,3) = USR(SAV,ID) 
Where MATRIX (1,2,3) is any kind of matrix 
(numeric, integer or string) of any size with any 
number of dimensions, SAV is a previously defined 
variable pointing to the SAVE. MAT machine- 
language program and ID is a variable in the range 
of to 127 which is the tape ID file number. This 
statement can be entered as a direct command after 
a program has been run or it can be used anywhere 
in a program, even in a loop. If you want to save the 
entire MATRIX, then use the same subscripts that 
were used to DIMension and the MATRIX. You can 
save a portion of the MATRIX by making the last 
subscript a smaller number than its DIMension. 
SAV and ID cannot be matrix variables. 

To load a matrix back into the computer use 
a similar statement of the form: 

MATRIX (1,2,3) = USR(LOA,ID) 
Where LOA is a previously defined simple variable 
pointing to the LOAD. MAT machine-language pro- 
gram and the other variables are the same ones used 
to save the MATRIX. 

If you have implemented a second cassette con- 



trol for your SYM-1 (see MICRO 18:5) then the 
proper cassette will be turned on for a LOAd or a 
SAVe operation and you can write programs that in 
effect handle a very large data base by partitioning 
it into smaller chunks that are read in from one 
recorder, operated on and read out to the other 
recorder automatically. 

Description Of Program Implementation 

Step 1: Deposit and Verify the OBJECT LISTING. 

If you have only 4K of RAM, do this at 0EE6 

and then change all of the lF's to OF's. 

This can be done easily with .M 1F.EE6-FFF 

(CR) followed by 11 sets of OFG (no (CR)'s). 

Do another verify (.V EE6-FFF) which should 

give a checksum of 8747. 
Step 2: Jump to BASIC (J 0) and use 7910 for 

the size or 3814 if you have 4K of RAM. 
Step 3: Enter a program such as: 

100 SAV = &"1F07" (or SAV = &"0F07" for 4K) 

110 POKE 42544,10: REM LONG TAPE DELAY 

120 FOR I = TO 10 

130A%(I) = I 

140 A(I) = SQR(I) 

150 A$(I) = CHR$(I + 65) 

160 NEXT I 

150A%(10) = USR(SAV,1) 

180A(10) =USR(SAV,2) 

190A$(10) = USR(SAV,3) 
Step 4: Rewind a tape and start it in record mode. 
Step 5: RUN the program. 
Step 6: When BASIC responds with OK, type NEW 

and enter a second program such as: 

100 LOA = & "1EE6" (or LOA = &"0EE6" 

for 4K) 

110A%(10) = USR(LOA,l) 

120A(10) = USR(LOA,2) 

130 A$(10) = USR (LOA,3) 

140 FOR I = TO 10 

150 PRINT A%(I), A(I), A$(I) 

160 NEXT I 
Step 7: Rewind the tape and start it in play mode. 
Step 8: RUN the program. After all the matrices 

are read in from tape they will be printed on 

the terminal. 
Step 9: In case the computer has trouble reading a file, 

rewind the tape and restart it in play mode. If 

you want to abort the tape read process, hold 

the BREAK key on the terminal down until the 

tape stops. You can CONTinue from this point 

if you want to; however, the matrix that couldn't 

be read in will be cleared to zeroes or nulls. 



SYM-PLICITY 
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ENGINEERED SPECIFICALLY FOR 
THESYM-1 MICROCOMPUTER 

• Easy Access for 
Adjustments 

• Room for Expansion 

• Protects Vital Components 
EASILY ASSEMBLED 



MADE OF HIGH IMPACT STRENGTH 
THERMOFORMED PLASTIC 

• Kydex 100* 

• Durable 

• Molded-ln Color 

• Non-Conductive 
AVAILABLE FROM STOCK 



• Absolutely No • Allow Two to Three Weeks for 
Alteration of SYM-1 Required Processing and Delivery 

• All Fasteners Provided • No COD's Please 

• Goes Together in Minutes • Dealer Inquiries Invited 

ATTRACTIVE FUNCTIONAL PACKAGE 

• Professional Appearance 

• Popular "Data Blue" Color 

• Improves Man/Machine Interface 



TO ORDER: 

NAME 

STREET _ 
CITY 



1. Fill in this Coupon (Print or Type Please) 

2. Attach Check or Money Order and Mail to: 



STATE . 



ZIP 



Please Ship Prepaid 

@ $36.75 each 
California Residents Please Pay 

$39.14 (Includes Sales Tax) 



SSE1-1(s) 



enclosures 
group 

771 bush street 

san francisco. California 94108 



' TM Rohm & Haas 



Patent Applied For 
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Description Of 
Program Operation 

The program stores two copies of each 
file on tape to provide an automatic 
back-up in case of error during loading. 
Between files, the tape delay is set to its 
minimum possible value (about 1.5 
seconds) and set back to its default 
value (about 6 seconds) at the end of 
the routine. You can change these 
values if you have special require- 
ments. Also, you can set the tape delay 
to a larger value at the beginning of 
tape operations to automatically move 
the tape off its leader, as in the 
first sample program above at line 110. 

For numeric and integer matrices, 
the elements themselves are stored 
directly on tape with no manipulation 
since they are already in contiguous 
order. The start and stop addresses 
are determined from "foot-prints" on 
page zero left over from the normal 
matrix interpretation done by BASIC. 

For string matrices the procedure 
is considerably more complex. About 
one half of the total code is involved 
in the special requirements of strings 
since they are not stored together in 
one place. The best we can do is re- 
arrange things until all the string infor- 
mation is contained in two separate 
files which can be stored on tape. The 
first of these files consists of three 
bytes per string. The first byte is the 
length of the string and the last two are 
a pointer or address to where the 
ASCII characters making up the string 
are stored. This first file is already 
in contiguous order but before it can be 
used the second file must be created 
since the first file contains pointers 
to the second file. The second file is 
created by going through all the string 
pointers (in reverse order) and copying 
each string into unused memory 
space using two of the BASIC inter- 
preter routines which leave the strings 
themselves in one continuous block. 
When the first file is stored it is given 
an ID greater than 127 (most signifi- 
cant bit is set) so the load routine can 
distinguish it from the second file. 

The routines determine when a 
string matrix is being operated on by 
pulling six bytes off the stack and 
branching on the condition of a zero 
which indicates a non-string matrix. 
These six bytes plus one more are 



ASSEMBLY LISTING: 



68 
68 

63 
68 
63 
63 
F0 OB 



E IF 



1EE6- 
1EE9- 
1EEA- 
1EEB- 
1EEC- 
1EED- 
1EEE- 
1EEF- 
1EF1- £0 C9 IF 



1EF4 
1EF7 
1EF9 
1EFC 
1EFE 
1F00 
IF 02 
1F05 
1F06 



£0 5F IF 
F0 0C 
£0 9E IF 

A5 6F 
£9 ?F 
iF 



- 35 SF 
£0 C9 
68 

- 60 



IF 



£0 £E 
63 



IF 



C- 63 



1F07- 

1F0A- 

1F0B- 

1F0C- 

1F0B- 

1F0E- 

1F0F- 

1F10- 

1F1£- £0 5F IF 

1F15- F0 OD 

1F17- £0 BC IF 

=1- £0 9E IF 



68 
F0 0B 



1F1FI 

1F1D 

1F1F 

1F£1 

1F£4 

1F£7 

1F29- 3D 30 Mb 

1F£C- 68 

1F£D- 60 



AS 6F 
£9 7F 
3D 4E A6 
£0 BC IF 
A9 04 



1F2E- 
1F31- 
1F32- 
1F34- 
1F37- 
1F39- 
1F3B- 
1F3E- 
1 F4 0- 
1F42- 
1F45- 
1F47- 
1F49- 
1F4B- 
1F4C- 
1F4E- 
1F51- 
1F53- 
1F55- 
1F57- 
1F59- 
1F5C- 
1F5E- 

1F5F- 
1F61- 
1F63- 
1F65- 



8b 



£0 
98 

09 30 
3D 4E A6 
35 6F 
A5 A3 
8D 4C A6 
85 70 
A5 A9 
80 4D A6 
85 71 
A5 99 
85 BF 
18 

65 73 
3D 4A A6 
35 6D 
A5 9A 
35 CO 
69 00 
3D 4B A6 
85 6E 
60 

A9 00 
35 9A 

no oo 

Bl BF 



0010 
00£0 
0030 
004 
0050 
0060 
0070 
0080 
0090 
0100 
0110 
0120 
0130 
0140 
0150 
0160 
0170 
0130 
0190 
0£00 
0£10 
0££0 
0£30 
0£4 
0£50 
0£60 
0270 
0£S0 
0£90 
0300 
0310 
03£0 
0330 
0340 
0350 
0360 
0370 
0330 
0390 
0400 
0410 
0420 
0430 
0440 
0450 
0460 
0470 
0430 
0490 
0500 
0510 
0530 
0530 

054 

055 
0560 
0570 
0530 
0590 
0600 
0610 
0620 
0630 
0640 
0650 
0660 
0670 
0680 
0690 
0700 
0710 
0720 
0730 
0740 
0750 
0760 
0770 
0780 
0790 
0800 
0310 
0320 
0330 
0340 
0850 
0360 
0870 
0330 
0890 
0900 
0910 
0920 
0930 
0940 



ID 

MAT. START 

MAT.STARTC 

MAT. CUR. EL 

MAT.EMDC 

EL. SIZE 

CUR. STRING 

NEW.STR.PN 

NEU. STRING 

XFR. STRING 

ACCESS 

INJISV 

Fl 

DIG 

PI 

PS 

P3 

TAPDEL 

TAPE. DELAY 

J.SAVET 

J.LDADT 



. DE $6F 

.DE SR3 

.DE $70 

.DE S99 

.DE $6B 

.DE $73 

. DE *BF 

. DE $83 

.DE $D2A9 

.DE $D42F 

.BE $3B36 

.DE $3392 

.DE S3723 

.DE $A400 

. DE $A64E 

.DE $A64C 

. DE $A64A 

. DE $A630 

.DE 4 

.DE SC6 

.DE $C9 

. BA S1EE6 
.OS 



COPY DF TAPE ID 

PDINTER TD FIRST ELEMENT OF MATRIX 

CDPY DF ♦MAT. START 

PDINTER TO MATRIX CURRENT ELEMENT 

CDPY DF END DF MATRIX FDR ABORT 

NUMBER DF BYTES PER ELEMENT 

CURRENT STRING TD BE TRANSFERRED 

PDINTER TO NEU STRING 

GET LOCATION OF STRING DF LENGTH=fl 

TRANSFER STRING TO NEU LOCATION 

SYSTEM MONITOR RAM UNPPDTECT 

CARRY SET MEANS BREAK 

MIDDLE DF MONITOR FILL ROUTINE 

FIRST DIGIT DF DISPLAY 

TAPE ID PARAMETER 

TAPE START ADDRESS 

TAPE STDP ADDRESS + 1 

TAPE DELAY LOCATION 

TAPE DELAY DEFAULT VALUE 

BASIC JUMP VECTOR TD SAVE TAPE 

BASIC JUMP VECTOR TO LOAD TAPE 



LOAD. MAT 



L0AD.MAT6 



LOAD. MAT? 



SAVE. MAT 



SAVE.MAT6 



SAVE.MAT7 



INIT.PARMS 



JSR INIT.PARMS 

PLA 

PLA 

PLA 

PLA 

PLA 

PLA 

BEG LDAD.MAT6 

JSR LDADT.HS 

JSR ORD. STRING 

BEG L0AD.MAT7 

JSR STR.PARMS 

LDA *ID 

AND ::$7F 

STA ♦ ID 

JSR LDADT.HS 

PLA 

RTS 

JSR INIT.PARMS 

PLA 

PLA 

PLA 

PLA 

PLA 

PLA 

BEG SAVE.MAT6 

JSR ORD. STRING 

BEG SAVE.MAT7 

JSR SAVET.£.HS 

JSR STR.PARMS 

LDA »ID 

AND -$7F 

STA PI 

JSR SAVET.£.HS 

LDA -TAPE. DELAY 

STA TAPDEL 

PLA 

RTS 

JSR 
TYA 
DRA 
STA 
STA 
LDA 
STA 
STA 
LDA 
STA 
STA 
LDA 
STA 
CLC 
ADC 
STA 
STA 
LDA 
STA 
ADC 
STA 
STA 
RTS 



ACCESS 

"$80 

PI 

♦ ID 

•MAT. START 

P£ 

♦MAT.STARTC 

♦MAT.START+1 

P2+1 

♦MAT.STARTC+1 

♦MAT. CUR. EL 

♦CUR. STRING 

♦EL. SIZE 

P3 

♦MAT.ENDC 

♦MAT. CUR. EL-*- 1 

♦CUR.STRIN6+1 

::0 

P3+1 

♦MAT.ENDC-M 



ORD. STRING 
0RD.STR.1 



LDA ::0 

STA ♦MAT.CUR.EL+1 

LDY ::0 

LDA (CUR. STRING) .V 



INITIALIZE TAPE PARAMETERS 
FDR FIRST FILE 



THROW AWAY 7 STACK BYTES 
6 NDW. 1 LATER 



BRANCH IF NOT STRING MATRIX 
GET STRING PDINTER FILE 

(ID MUST BE > 1£7> 
RESERVE STRING FREE SPACE 
BRANCH IF ALL STRINGS NULL 
SET UP STRING PARAMETERS 
ID MUST BE < 1£3 



GET LAST FILE 

THROW AWAY LAST STACK BYTE 

RETURN TD BASIC 

INITIALIZE TAPE PARAMETERS 
FOR FIRST FILE 

THRDW AWAY 7 STACK BYTES 
6 NOW, 1 LATER 



BRANCH IF NDT STRING MATRIX 
PUT MATRIX STRINGS IN ORDER 
BRANCH IF ALL STRINGS NULL 
SAVE £ COPIES OF POINTERS 

WITH ID > 1£7 
SET UP STRING PARAMETERS 
MAKE ID < 1£3 



SAVE £ COPIES OF LAST FILE 
RESTORE TAPE DELAY DEFAULT 



THRDW AWAY LAST STACK BYTE 



PASS ID TD PARM 1 BUT 
MAKE ID > 1£7 



ALSO SAVE CDPY FOR STRINGS 
PASS MATRIX START TO PARM 8 



ALSO SAVE COPY TO ORDER 
STRINGS 



CALCULATE PARM 3 

SAVE COPY TO ORDER STRINGS 

ADD ELEMENT SIZE TO INCLUDE 

CURRENT ELEMENT 
SAVE CDPY FOR ABORT 



PROPAGATE CARRY 



CLEAR NON-NULL STRING FLA6 
LENGTH OF CURRENT STRING 
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1F67- 


FO 


1C 




0950 




BED 


DRD.STR.3 


1F69- 


R6 


9fl 




0960 




LDX 


♦MAT.CUR.EL+1 


1F6B- 


BO 


03 




0970 
0980 




BNE 


DRD.STR.2 


1F6D- 


R6 


BF 




0990 




LDX 


•CUR. STRING 


1F6F- 


86 


99 




1000 




STX 


•MAT. CUR. EL 


1F71- 


A6 


CO 




1010 




LDX 


•CUR.STRIN8+1 


1F73- 


86 


9fl 




1020 




STX 


•MAT.CUR.EL+1 


1F75- 


£0 


09 


02 


1030 


DRD.STR.2 


JSP 


NEW. STRING 


1F7S- 


20 


2F 


D4 


1040 




JSR 


XFR. STRING 


1F7B- 


C8 






1050 




I NY 




1F7C- 


AS 


S3 




1060 




LOR 


•NEW. STR. PN 


1F7E- 


91 


BF 




1070 




STR 


<CUR.STRING>»Y 


1FS0- 


A5 


84 




1080 




LOR 


♦NEIJ.STR.PN+1 


1F32- 


C8 






1090 




I NY 




1F83- 


91 


BF 




1100 




STA 


<CUR. STRING) . Y 


1F35- 


fl5 


BF 




1110 


0RD.STR.3 


LOR 


♦CUR. STRING 


1F87- 


38 






1120 




SEC 




1F33- 


E5 


78 




1130 




sec 


•EL. SIZE 


1F8A- 


35 


BF 




1140 




STR 


•CUR. STRING 


1F8C- 


Flo 


CO 




1150 




LDX 


♦CUR.STRING-M 


1F3E- 


BO 


01 




1160 




BCS 


DRD.STR.4 


1F90- 


Cfl 






1170 




OEX 




1F91- 


36 


CO 




1130 


DRD.STR.4 


STX 


•CUR.STRING+1 


1F93- 


E4 


71 




1190 




CPX 


•MRT.STARTC+1 


1F95- 


BO 


cc 




1200 




BNE 


DRD.STR.l 


1F97- 


C5 


70 




1210 




CMP 


•MRT.STARTC 


1F99- 


BO 


C8 




1220 




BCS 


DRD.STR. 1 


1F9B- 


A5 


9fl 




1230 




LOR 


♦MRT.CUR.EL+1 


1F9D- 


60 






1240 
1250 




RTS 




1F9E- 


fl5 


83 




1260 


STR.PRRMS 


LDR 


♦NEW. STR. PN 


1FA0- 


80 


4C 


R6 


1270 




STR 


P2 


1FA3- 


AS 


84 




1280 




LDR 


•NEW.STR.PN-H 


1FA5- 


SB 


40 


R6 


1290 




STA 


P2+1 


1FAS- 


RO 


00 




1300 




LDY 


"0 


lFflfl- 


Bl 


99 




1310 




LDfl 


<MRT.CUR.EL>»Y 


1FAC- 


13 






1320 




CLC 




1FAD- 


C3 






1330 




I NY 




1FAE- 


71 


99 




1340 




ADC 


<MAT.CUR.EL> .Y 


1FBO- 


80 


4fl 


A6 


1350 




STR P3 


1FB3- 


C3 






1360 




I NY 




1FB4- 


Bl 


99 




1370 




LDA 


<MAT.CUR.EL>»Y 


1FB6- 


69 


00 




1330 




ADC 


oo 


1FB8- 


3D 


4B 


R6 


1390 




STA 


P3+1 


1FBB- 


60 






1400 
1410 




RTS 




1FBC- 


20 


C4 


IF 


1420 


SRVET.2.HS 


JSR 


SAVET.HS 


1FBF- 


R9 


01 




1430 




LDR 


"1 


1FC1- 


80 


30 


A6 


1440 




STR 


TAPDEL 


1FC4- 


RO 


80 




1450 


SRVET.HS 


LDY 


::JS0 


IFC6- 


4C 


C6 


00 


1460 
1470 




JMP 


J.SAVET 


1FC9- 


20 


92 


33 


1430 


LDADT.HS 


JSR 


INJISV 


1FCC- 


BO 


14 




1490 




BCS 


ABORT 


1FCE- 


R9 


FF 




1500 




LDfl 


::$FF 


iFno- 


80 


4E 


R6 


1510 




STA 


PI 


1FD3- 


RO 


80 




1520 




LDY 


"JSO 


1FD5- 


20 


C9 


00 


1530 




JSR 


J.LOADT 


1FDS- 


BO 


EF 




1540 




BCS 


LDADT.HS 


1FDA- 


RO 


u u 


R4 


1550 




LDfl 


DIG 


1FDD- 


cs 


6F 




1560 




CMP 


• ID 


1FDF- 


DO 


E8 




1570 




BNE 


LDADT.HS 


1FE1- 


60 






1580 
1590 




RTS 




1FE2- 


68 






1600 


ABDRT 


PLfl 




1FE3- 


63 






1610 




PLfl 




1FE4- 


68 






1620 




PLfl 




1FE5- 


R9 


00 




1630 




LDfl 


"0 


1FE7- 


R6 


70 




164 




LDX 


•MRT.STRRTC 


1FE9- 


R4 


71 




1650 




LDY 


♦MflT.STflRTC+1 


1FEB- 


36 


FE 




1660 




STX 


•SFE 


1FED- 


34 


FF 




1670 




STY 


♦•IFF 


1FEF- 


A4 


6E 




1630 




LDY 


♦MflT.ENDC+1 


1FF1- 


R6 


60 




1690 




LDX 


♦MRT.ENDC 


1FF3- 


00 


01 




1700 




BNE 


RBDRT.4 


1FF5- 


88 






1710 




DEY 




1FF6- 


Cfl 






1720 


ABORT. 4 


DEX 




1FF7- 


8E 


4fl 


A6 


1730 




STX 


P3 


1FFA- 


8C 


4B 


R6 


1740 




STY 


P3+1 


1FFD- 


4C 


23 


87 


1750 
1760 




JMP 
.EN 


Fl 
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normally used to pass pertinent infor- 
mation to the calling routine. How- 
ever, as they are used here, we don't 
want the calling routine to store the 
returned value in the specified matrix, 
so we simply discard the seven stack 
bytes. In fact, under normal condi- 
tions, it is not possible to specify 
a string variable in a USR statement, 
but by pulling seven bytes off the stack, 
we avoid the type mismatch (TM) 
error test (which fortunately is done 
after returning from USR) and return 
one level deeper which causes the 
BASIC interpreter to go on to the next 
statement. 

If an attempt is made to store a 
string matrix that consists entirely of 
null strings, then only the first file is 
stored since there will be nothing in the 
second file. Special tests are made in 
both the save and load routines to 
handle this case. Also, it is necessary 
to use the end of the last non-null 
string as the end of the second file 
since to use the pointer of a null 
string would result in a meaningless 
tape stop address. Special tests are used 
to perform this function. 

It is a good idea to eliminate 
DATA statements from a program 
after they are used to initialize a 
matrix that is stored on tape since 
they will only take up memory in 
future runs. If during the ordering of 
strings the memory is actually used up, 
a OM (out of memory) error will 
occur. 

No record is kept on the tape of 
the name of the matrix or its size and 
no tests are performed to verify these 
things. However, if the file does not 
have the correct number of bytes in it, 
it will fail the normal tape error 
tests. The intention is to provide a 
means for a program or operator to 
save and retrieve data conveniently, 
but the task of remembering the size 
of the matrix or portion of matrix 
remains with the program or operator. 
Unlike the usual BASIC command for 
LOADing programs, if you don't know 
how big the matrix is that is on a 
tape, it can be very difficult to load 
it, so be organized in your use of these 
routines and they will serve you well. 



BRANCH IF LENGTH = CHULU 

BRANCH IF NDN-NULL STRING 
ALREADY FOUND 

COPY POINTER TO LAST NON- 
NULL STRING 



GET NEW LOCATION FOR STRING 
TRANSFER TO NEW LOCATION 
Y = Y ♦ 1 = 1 
COPY NEW STRING POINTER 



GET NEXT STRING POINTER 
(WORKING FROM LAST TD 
FIRST SO SUBTRACT* 



PROPAGATE BORROW 

TEST FOR RLL STRINGS DONE 



SET Z IF ALL STRINGS NULL 
START OF STRINGS TO PfiRM £ 



END DF STRINGS TO PARM 



ADD LENGTH OF LAST NDN-NULL 
STRING TO ITS PDINTER TO 
END OF STRINGS 



SAVE 2 COPIES IN HI -SPEED 
MODE WITH MINIMUM DELAY 
BETWEEN THEM 

JUMP THROUGH BASIC VECTOR 

TEST FOR BREAK 

GET ANY FILE FROM TAPE 



JUMP THROUGH BASIC VECTOR 
REPEAT IF BAD LOAD 
GET ID 

REPEAT IF WRONG ID 



DISCARD EXTRA STACK BYTES 



CLEAR ABORTED MATRIX 
SET UP FOR MONITOR FILL 



SUBTRACT ONE FROM END 



FILL AND RETURN 
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Part 1 of a series: 

OSI ROMs 

T. R. Berger 

There seems to be some curiosity about OSI's non- 
BASIC ROMs, i.e. ones above address $F800. The 
schematic for the CI, 2, 4, and 8 shows a 2K ROM 
(type 2316B). Disassembly shows that the CI has the 
full 8 pages of this ROM addressed in memory loca- 
tions $F800 to $FF00, but the C2, 4, and 8 have only 
3 pages of this 8 page ROM appearing in memory. 
Actually, there is only one 2K ROM used in all these 
machines! (The old C2's without polled keyboard and 
the C3 with serial monitor or hard disk are exceptions 
which we will ignore.) 

The C2, 4, and 8 have special address selecting 
circuitry which allows the computer to choose and 
address any 3 of the 8 pages in this 2K ROM. The 
CI does not contain this special circuitry (pre- 
sumably to cut costs) so that all 8 pages of the ROM 
appear in memory whether or not they are needed. The 
Cl uses 4 of the 8 pages and the remaining 4 pages 
fall where they will, misaddressed and unrunable. 
Since the Cl is the only machine with all 8 pages, let 
us use Cl addresses to describe the various pages of 
this ROM. 

The page in which a segment of code appears in 
the Cl is not necessarily the page in which the code 
is written to run. For example, Cold Start for ROM 
BASIC C2, 4, and 8 computers was written to run in 
page $FF but appears in page $FB in the Cl. In par- 
ticular, in the Cl at $FB43 we see JSR $FFB8. 
The requested subroutine now appears at address 
$FBB8 in the Cl and $FFB8 is actually the third 
byte of a jump instruction. If the computer is asked 
to run this code, this subroutine jump will send the 
computer to limbo. Thus the code (with minor 
exceptions of no importance) in page $FB of the Cl 
will not run. 

Table 1 gives a summary of the various functions 
of this ROM. The first column gives the Cl page 
number, the second column gives the model numbers 
of Challengers which use the given page of code 
(e.g. 4 means C4); the third column gives the type 
of machine (i.e. ROM BASIC or Disk); the fourth 
column gives the function of the page; and finally, 
the fifth column tells in which page the code was 
written to run. 

Cl owners with a disassembler may read the code 
which all of us run. The rest of us will have to 
make do with the pages we actually use. However, 
not much is missed since the code is highly redun- 
dant. Commercial computer users know that the most 
costly facet of computing is software development. OSI 
can sell its computers at low cost because of a 
policy minimizing software development costs. That is, 
if a program is written for one machine, and by 



patching existing code it will run on another (even 
though at less than peak efficiency) then, by all 
means, patch. Thus the Cl code in these ROMs is 
just patched versions of the code written for the 
C2, 4, and 8. If this ROM were rewritten carefully, 
it would easily fit into IK and run on all machines. 
But the larger ROMs come much more cheaply than 
rewriting the code. MORAL: Hardware is cheap, soft- 
ware is expensive. Businessmen know this; we do too 
when we yell 'software ripoffl' 

Since Cl run pages differ only in patches and 
relocation (with precious little relocation) from C2, 4, 
and 8 run pages, it is necessary to only under- 
stand about half of this ROM in order to under- 
stand it all. The fundamental pages are listed in 
Table 2. When the code was patched to run on the 
Cl, every effort was made not to move addresses. For 
example, where the machine monitor for the C2, 4, 
and 8 resets a PI A not available on the Cl, (Cl 
addresses $FA04 to $FA0B), the corresponding code 
for the Cl is filled with NOP instructions (Cl 
addresses $FE04 to $FE0B). 

I am writing a series of articles on theOS65D 
operating system. The first article, on the Kernel, 
should appear in the next issue. At least one later 
article in this series will be devoted to this ROM. 
In particular, much more detail on these ROMs will 
appear in the near future. If you have urgent ques- 
tions, you may send a stamped self-addressed envelope 
to me at: 
Tom Berger 
10670 Hollywood Blvd. 
Coon Rapids, MN. 55433 



TABLE 1 










C1P PAGE 


MACHINE 


TYPE 


FUNCTION 


RUN 
PAGE 


SF8 


2,4,8 


DISK 


BOOT 


$FF 


SF9 


2,4,8 


ALL 


KEYBOARD 


SFD 


SFA 


2,4,8 


ALL 


MONITOR 


$FE 


SFB 


2,4,8 


ROM 
BASIC 


BOOT 


$FF 


$FC 


1 


DISK 


BOOT 


SFC 


SFD 


1 


ALL 


KEYBOARD 


SFD 


SI K 


1 


ALL 


MONITOR 


$FE 


$FF 


1 


ALL 


BOOT 


$FF 
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ALL ABOUT OSI 
MICROSOFT 
BASIC-IN-ROM, 
VERSION l.O 
REV 3.2 

by Edward H. Carlson 

Published by the author 

3872 Raleigh Drive 

Okemos, Ml, 48864 

8'/2 x 11 inches Soft-cover, 60 Pages, 

$8.95 

Review by Charles L. Stanford 

This book would almost certainly have saved me 
from many very frustrating hours of pouring through 
OSI's so-called "Manuals" and several of the 
general texts on BASIC during the first months I 
owned my CI P. Would you believe, I discovered 
how to use the immediate mode by accident, in 
about the fifth week? Mr. Carlson covers the subject 
very nicely on the first page of his new book. 

Granted, BASIC is BASIC, to a very large 
degree. It's not too hard to convert from one com- 
puter's BASIC to another's. Most commands and 
functions act alike. But there are significant dif- 
ferences in some areas; I can never remember the ex- 
act result of some of the functions I seldom use, such 
as TAB and INPUT. So every encounter with those 
commands in a published program requires some 
searching in the files. This reference book ends that. 

Mr. Carlson states in the introduction that he is 
presenting OSI BASIC on two levels; pure BASIC, 
and then the underlying principles of program code 
storage, pointers, flags, and the way programs really 
work. He succeeds admirably in the first, with only 
minor exceptions. Each of the commands, 
statements, functions, and operators is listed and 
discussed in detail. Many examples and suggestions 
are included, and useful combinations of functions 
are presented. In particular, I learned some things 
about the USR function I could only guess at before 
(and I use it heavily). A very few of the functions 
covered could have stood a heavier treatment. WAIT 
IJ,K and the Boolean Operators AND, OR, and 
NOT are, as is usual, glossed over, apparently under 
the theory that everyone understands Boolean 
Algebra. It is very elementary, but many hobbyists 
haven't yet seen its usefulness, and may never until 
more of its advantages are more thoroughly pointed 



out and explored. Be assured, though, that these are 
minor faults - the coverage of BASIC is very 
thorough. This manual, together with a more 
generalized text (such as Basic BASIC) should meet 
any programmer's needs. 

Mr. Carlson's treatment of his second task is 
not quite so successful, although still very thought- 
provoking and useful. He has caused some con- 
siderable loss of sleep, while I explore the machine 
codes his lists and tables point out. There is an ex- 
tremely well annotated memory map for pages $00 
through $03, as well as a listing of the Monitor 
ROM from $FE00 to $FFFF. The ROM listing is 
for the C2-4P, but differences in the C IP ROM are 
called out in a separate list. I think most OSI owners 
have figured out by now that the BASIC ROMs are 
identical for all models, with only the Monitor 
ROMs being different. 

Other useful discussions are presented on the 
format and programming of both BASIC and 
Machine Language tapes, floating point numbers, 
and the way the program stores variables. Less suc- 
cessful sections cover the source code and two's com- 
plement binary numbers. The only section that fails 
badly, however, is the one on OSI's Big Bug. I refer, 
of course, to the String Array Garbage Collection 
glitch. The author presents what might appear to be 
a really simple solution. It does, in fact, work. But 
it's virtually impossible to overlay on an existing pro- 
gram which uses a lot of concatenated string arrays. 
There are more effective solutions to this bug. 

All in all, I think that any of several sections of 
this very well presented manual are worth the pur- 
chase price. I recommend it to the hobbyist and to 
the serious programmer alike. © 



42 



compute II. 



August/September. 1980. Issue 3. 



Fast Graphics 
On The OSI C1P 

Charles L. Stanford 

I am sure that almost without exception, OSI C1P and 
Superboard II owners get a major part of their compu- 
ter fun from games. The relative ease of graphics 
programming using the game symbols in the Character 
Generator ROM allows even the novice BASIC 
programmer a lot of freedom for creating exciting and 
fastmoving figures. However, even OSI's very fast 
BASIC still leaves a lot to be desired when more 
than a few dozen screen locations are changed, result- 
ing in distracting image changes and in slow execution 
of commands. 

This article will present a "cookbook" version of a 
machine language graphics subroutine. The BASIC 
user with little or no background in Machine or 
Assembly language programming will be able to use 
the material presented here to "plug in" his own 
graphics. The more advanced programmer will be able 
to adapt the concepts shown to complicated, inter- 
active graphics games and simulations. 

The use of graphics in games 

While many exciting and worthwhile games are played 
without graphics (such as most versions of Starwars, 
Star Trek, Quest, etc.), most family fun games revolve 
around the manipulation of graphics figures or objects 
on the screen. Six Gun Shootout, Tank, Lunar 
Lander, and many others are "made" by their 
graphics interactions. But a game like Six Gun written 
solely in BASIC is slowed down so badly by the time 
required to POKE two gunfighters and a few cacti that 
it looses a lot of its Oomph! Even a near-instantaneous 
screen routine (instead of scrolling) only helps a little 
when 50 or 100 or more POKE's are needed every time 
a move is made. 

The method presented in this article does have a 
few limitations, mainly in the opportunity for typing 
errors when entering the many DATA statements, and 
in the need to carefully plan and structure each and 
every character before starting to enter the program. 
But the results are really worth it. Every program 
I've written since devising this method has had to be 
slowed down with time delay loops, which is sure better 
than the alternative. 

The USR Function 

The OSI Graphics Reference Manual and the BASIC 
in ROM Manual are ridiculously brief in describing 
the use of the USR function. On the other hand, 
there isn't that much knowledge needed for an elemen- 
tary application such as this one. In general, you will 
need to be capable of converting Hex numbers to 
Decimal quickly and accurately; the only other require- 



ment is to be able to write a fairly structured 
BASIC program. 

When the USR function is called by a line such as 
10 X = USR (X), the program goes to the machine 
language program subroutine pointed to by the data at 
memory locations $000 A and $000B (Decimal #11 and 
#12). The 6502 processor needs a 16 bit address to 
jump to a subroutine. But each memory location only 
has 8 bits. So the processor reads the eight lower 
(right-most) bits of the address from the lower of two 
adjacent memory addresses, and the eight higher 
(left-most) bits from the higher. Thus, a machine 
language routine at address $0222 would be called if 
memory locations $000A and $000B held $22 and $02 
respectively. These numbers would be inserted in these 
two RAM locations by a line in BASIC such as 20 
POKE 11,34 : POKE 12,2. Note that the Hex num- 
bers have to be converted to their Decimal equiva- 
lents for BASIC. As you can see, many machine pro- 
grams starting at as many different memory locations 
could be called, merely by changing the data at $000A 
and $000B before calling the USR function. I'll de- 
scribe how to write and insert the actual machine 
language subroutines a bit later in this article. 

After a machine language subroutine is called, it 
acts very similarly to a BASIC program, in that each 
instruction is executed in order until a RETURN is 
encountered. It then returns to the next instruction 
after the JUMP. The RETURN in machine language 
is the RTS instruction, which is Hex $60 (or Dec 
#96). 

The advantage of all this is, of course, based in the 
fact that machine language is somewhere around 1000 
times faster than BASIC for most equivalent functions. 
This feature is particularly useful for graphics 
programming. 

Machine language programming 
Writing programs in machine language, especially 
without the use of an Assembler, is a bit tedious. But 
the end result is often worth the effort. In this case, 
you, the reader, will use the program itself exactly 
as presented here, only changing a table which will 
hold whichever graphics figures needed for your par- 
ticular game. 

The action of the subroutine is quite simple. After 
a Screen Clear (note that the first eight lines of 
Listing 1 are as shown in my previous article in 
Compute II Number 1), a series of graphics characters 
and their locations relative to a fixed point are read 
from memory and written to the TV screen. 

The routine makes use of one of the 6502 pro- 
cessor's more efficient addressing modes, Zero Page. 
Line 023A uses the instruction LDA-0.Y, which 
loads the accumulator with the data residing at a mem- 
ory location equal to the value of the address 
pointed to by FE (lo byte) and FF (hi byte) plus the 
contents of the Y register. These two memory locations 
at the top of Zero page were chosen as they are easy to 
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remember, and are not used for any other purpose by 
BASIC or the Monitor. Since the Y register is an 
eight-bit register, only screen locations between the 
base address and the base address plus 255 can be 
called. 

Looking at the flow chart (Figure 1), you can see 
that the first data loaded is the lo byte, then the hi 
byte, of the screen location. This information is in the 
table for this particular game, and is deposited within 
the program to give a start location on the screen 
for the first graphics figure. Next, the offset of the 
first character is loaded into the X register, and a 
check is made to see if the figure is ended. I have 
selected $FE (254) as a signal that part of the figure 
is completed, and $FF (255) for the end of the routine. 
If this data is neither, a graphics symbol will be loaded 
into the accumulator. This symbol is then deposited in- 
to the video refresh memory at the location pre- 
viously loaded plus the offset in the X register. 

This may all sound a bit complicated, but that 
doesn't make any difference to you, the programmer. 
The program will take care of itself if the proper data 
is presented from the symbol table in the correct 
sequence. 



Developing the screen image 

The screen image is developed by following five easy 
steps, starting with a copy of the C1P Screen Grid. 
Being a railroad fan, I chose to enact the "Great 
Train Collision" as a demonstration program. As you 
can see from Figure 2a, the OSI graphics symbols 
allow for a very reasonable steam locomotive with ten- 
der. After you have drawn whatever figures you need 
for your game to your satisfaction, enter the screen 
offsets of all locations, starting at a fixed point at 
the upper left corner of each figure, as shown in 
Figure 2b. Finally, write in the character generator 
code as shown in Figure 2c. The last step is to enter 
the data into a table as shown in Listing 2. Note 
that each figure is preceded by a screen address (lo 
byte first), and ends in either FE or FF. The last 
figure in the table must be FF (255) which causes the 
subroutine to return to BASIC. 

Converting the Machine Language to BASIC 

There are several methods of entering machine or 
assembly language programs through the use of BASIC 
programs, including direct entry through the monitor. 
There are also several ways to save combination 
BASIC-machine language programs to tape (see 
Daniel Schwartz' article in Compute II issue 1). 
However, I prefer the somewhat tedious but easy to 
debug and modify DATA-POKE method. This is hard 
to enter error-free, and causes a significant delay 
on program initiation, but it has the advantage of being 
more readily understandable, and allows your routines 
to be changed easily. 

You can see that lines 100 through 145 in Listing 
3 enter the machine language subroutine into memory, 
while lines 148 through 199 are the table of offsets 
and characters for the figures. This is to allow the 
use of this sequence with other graphics figures of your 
own choosing. Note also that the subroutine is 
inserted into RAM at $0222 (#546) in page 2. The 
page 2 memory from $0222 to $02FA is not used by 
BASIC, and is thus a good free place for this use. 
However, make sure your figures don't extend above 
$02FA. If so, you'll have to locate the table in the 
top of RAM, necessitating memory protection at Cold 
Start. The subroutine can still reside at $0222. 

Animating the Figures 

Once the graphics subroutine and the figure table are 
in RAM, the animation routines can be written in 
BASIC. The addresses needed to animate the demon- 
stration figures are as follows: 

HEX DEC DESCRIPTION 

Pointer to the starting address 
of the USR subroutine. 
Pointer to the starting address of 
the first graphics figure to be called. 
Actual starting address of the USR 
subroutine, including screen clear. 
Actual starting address of the USR 
subroutine without screen clear. 
Actual starting address of the first 
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0261 609 

029D 669 
029E 670 


graphics figure. These locations 

hold the video RAM reference address, 

Lo byte first, for the figure. 

Actual starting address of the second 

graphics figure. Also hold the 




this alternately inserts and omits the screen clear 
routine at the beginning of the machine language sub- 
routine. If your program only has one figure, or if you 
end all figures but the last with #254, location #11 



video RAM starting address for this figure. 

It is important to remember that the last two locations 
will vary depending on the location in RAM chosen 
to store the table, and according to the length of the 
figures in the table. The first four sets of addresses 
will remain the same for all programs. 

In the demonstration program, memory location 
#12 always holds a #2, but the data in location 
#1 1 is changed back and forth between #34 and #56; 



would stay at #34. Either method works equally well; 
chose the alternative which provides easiest animation 
in BASIC. 

Note that if each figure ends with a #254, the 
data at memory location #254 will not change. But 
ending the first or any intermediate figure with #255 
terminates the subroutine (see flow chart), and the only 
way to reach the next or subsequent figures is to change 
the pointer at #254 and #255. 
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As previously mentioned, the first two numbers 
in the table at the beginning of each figure are the 
video RAM address of the upper left hand corner of 
the figure. Since the video RAM of the C1P contains 
four pages of 256 bytes each, starting at $D000, the 
first number in the table at the start of each figure 
can vary from to 253 (remember, 254 and 255 are 
signals), and the second can be $D0 through $D3 
(#208 through #211). By POKEing different numbers 
into these locations, the figures can be made to move 
around the screen. It's better to use the actual first 
location of each figure in the original DATA state- 
ments, to avoid a jerk at the start of the program. 
After that, any desired location can be POKE'd 
into these addresses. 

In lines 25 and 35 of Listing 2, variables A 
and B are established as the low bytes of the screen 
locations for the two figures. Then, in the subroutine 
starting at line 50, they are POKE'd to 608 and 
669 respectively, and then incremented and decre- 
mented and POKE'd again to move the characters 
across the screen toward each other. To make the 



demonstration program more realistic, the engines 
are moved across the screen on different lines, and 
then reappear on a collision course. This is done by 
line 35, which changes A and B and also changes 
the hi byte of the right locomotive to #209 from 210, 
moving it higher on the screen. Variable C determines 
how far across the screen each figure will move. 

Finally, the routines at lines 200 to 399 give a 
rough representation of an explosion at the point of 
collision. I leave to the reader the exercise of adding 
this to the machine language table. It's not that hard! 

Summary 

In order, the steps for creating your own program 
using fast machine language graphics are as follows: 

1. Draw a representation of your selected characters, 
using the characters in the Graphics Reference Manual 
as elements. 

2. In an equivalent number of spaces, enter the off- 
sets of the screen address, starting at a point above 
and to the left of the figures. If the number of the 
offset exceeds 253, just split the figure into two or more 
parts and treat each as a separate entity. They can be 
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recombined in the BASIC program. 

3. Likewise, enter the graphics character codes in the 
equivalent spaces on the grid. 

4. Create a table which starts with the screen location 
of the figure (lo byte first, then hi byte); contains, 
alternately, the offset and code of each character; 
and ends in #254 or 255. If the figure ends in 254, 
the subroutine will continue with the next figure in the 
table. A #255 terminates the subroutine and returns 
to BASIC. 

5. Note the starting addresses of each figure, for later 
use in creating the animation in BASIC. 

6. Convert both the subroutine and the table into 
DATA statements. Note that if the table goes past 
memory location #608 + 144 (#752), it will be 
necessary to move all or part of it to another location 
in RAM, such as top of memory. 

7. Finally, enter the DATA statements and their 
POKE loops into an appropriate location in your 
BASIC program, in a manner similar to lines 100-199 
of Listing 2. Then precede with animation as in 
lines 25-99. 

8. Debugging hints: always save to tape as you go 
(a program crash is more likely in machine language, 
and all that tough typing will be lost); insert a BREAK 
after DATA loops, then use the Monitor to verify 



the machine language program entry, by single 
stepping starting at address $0222; insert timing 
loops at lines 22, 27, 32, and 37 to slow down action 
if there is a Bug in BASIC. 
Some additional notes 

Another interesting program I've written using this 
method is Six Gun Shootout. It has two gunfighters 
(one facing the other) and three cacti. After each 
shot, the cacti change locations at random. The pro- 
gram ran very slowly when written solely with BASIC 
POKE'S to the screen, but is as fast as you would 
ever want with machine language graphics. I'll cover 
this program in a later article, together with instruc- 
tions for attaching simple up-down-shoot joysticks to 
save wear and tear on the keyboard. 
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We Have Over 100 High Quality Programs For Ohio Scientific Systems 

TEXT EDITORS FOR ALL SYSTEMS!! 



ADVENTURES AND GAMES 

Adventures - These interactive fantasies will fit 

in 8K! You give your computer plain english 

commands as you try to survive. 

ESCAPE FROM MARS 

You awaken in a spaceship on Mars. You're in 

trouble but exploring the nearby Martian city 

may save you. 

DEATHSHIP 

This is a cruise you won't forget - if you survive it! 

Adventures $14.95 Tape or 5Vi" Disk 
$15.95 8" Disk 

STARFIGHTER $5.95 



Realtime space war with realistic weapons and a 
working instrument panel, 

ALIEN INVADER 6.95 (7.95 for color and sound 

Rows of marching munching monsters march on 
earth. 

TIME TREK $9.95 

A real time Startrek with good graphics. 

BATTLEPAC $17.95 



For the battlebuff. Contains Seawolfe, Starfighter, 
Bomber and Battlefleet. 



And lots, lots, lots more' 





These programs allow the editing of basic 
program lines. All allow for insertion, deletion, 
and correction in the middle of already entered 
lines. No more retyping. 

CI P CURSOR CONTROL (Text Editor) $9.95 

Takes 1 66 bytes of RAM and adds, besides text 
editing, one key instant screen clear. 

C2P/C4P CURSOR $9.95 

Takes 366 BYTES to add PET like cursor 
functions. Enter or correct copy from any location 
on the screen. 

SUPERDISK $24.95 for 5" $26.95 for 8" 

Has a text editor for 65D plus a great new 
BEXEC", a renumberer, search, a variable table 
maker and Diskvu - lots of utility for the money. 

We also have 25 data sheets available such as: 

IMPLEMENTING THE SECRET SOUND PORT ON 
THE C1P $4.00 

HOW TO DO HIGH SPEED GRAPHICS IN BASIC 
$4.00 

HOW TO READ A LINE OF MICROSOFT $1 .00 

JOYSTICK INSTRUCTIONS AND PLANS FOR 
Of $3.00 

SAVING DATA ON TAPE $4.00 
THE AARDVARK JOURNAL 



A tutorial bimonthly journal of how to articles 
*•* $9.00 

Our $1 .00 catalog contains a free program listing, programming hints, lists of PEEK and POKE locations and other stuff that OSI 
forgot to mention and lots more programs like Modem Drivers, Terminal Programs, and Business Stuff. 

Aardvark Technical Services 1 690 Bolton, Walled Lake, Ml 48088 (31 3) 624-631 6 
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Good News For 
OSI Readers 

As you may have read by now, the Editor's Notes in this 
issue announce the merger of COMPUTE and compute II into 
one, high quality, monthly magazine. 

Given the range of OSI products, we've decided to move 
you out of the Single-Board Computer Gazette, in the new 
COMPUTE!, and establish an OSI Gazette. 

We expect to be assisted in this endeavor by your 
continued input. Articles and programming notes should be 
addressed to: 

The Editor, COMPUTE!, 
P.O. Box 5406, 
Greensboro, NC 27403 
ATTN: OS! Gazette 

Given your input, we'll have a healthy, OSI Gazette. 
Robert Lock 
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Modification 
and Relocation 
of FOCAL 65-E 

Into Erasible 
Prom 

William C. Clements, Jr. 

Dept. of Chemical & Metallurgical 

Engineering 

The University of Alabama 

P. O. Box 2662 

University, Alabama 35486 



After using FOCAL for awhile, I became interested 
in storing the machine code in EPROM. Not only 
would this eliminate much of the waiting for tapes 
to load, but more important, it would free over 5K 
of user RAM for other purposes such as storing 
more FOCAL source code and variables, or for 
graphics routines. 

The relocation of FOCAL and execution of it from 
PROM is not as straightforward as for some other 
programs, because the machine code is self-modifying 
in several places. Also, there are multitudes of data 
bytes used for address pointers scattered through the 
program, and these are in such a form that the 
ordinary kind of relocation routine would not convert 
them. Thanks to the excellent documentation supplied 
with FOCAL, I was successful in relocating it in a 
"clean", non self-modifying form. The code, together 
with an initialization routine that sets up page zero 
and other RAM locations used for user statements 
and to make the code "clean", fits neatly into three 
2716's with plenty of room left over for other 
modifications such as tape load and save, "user" 
function, etc., which I have added to my version of 
FOCAL as well.' The modifications which follow 
are concerned with cleaning the code up for storage 
in PROM, and pertain to FOCAL 65-E for the 
KIM-1, obtained from the 6502 Program Exchange 
in Reno, Nevada. 

The first order of business in preparing FOCAL 
for PROM is to get rid of the self-modifying 
parts. The three places I found where FOCAL 
modifies itself in the main code are at Iocs. 
$2348-2353, S282C-283D, and $3408-3414. A fourth 
place occurs in page zero, where it doesn't 
matter since page zero is always RAM in 6502 



systems. The other places are easily fixed. I 
borrowed a few locations from an obscure corner 
of KIM's on-board RAM to do it; neither KIM nor 
FOCAL seems to mind. The changes are as follows: 

2348 was 8C 52 23 change to 8C DE 17 STY DJADR 
234E was 8C 53 23 change to 8C DF 17 STY DJADR + 1 
2351 was 4C 00 00 change to 4C DD 17 JMP $17DD 
282C was 8C 3C 28 change to 8C DB 17 STY DJADR 1 
2835 was 8D 3D 28 change to 8D DC 17 STA DJADR1 + 1 
283B was 6C 00 00 change to 4C DA 17 JMP $17DA . 
3408 was 8E 12 34 change to 8E El 17 STX MOV11 
340C was 8C 14 34 change to 8C E3 17 STY MOV22 + 1 
3411 was B5 00 change to 4C E0 17 JMP MOVIT 
3413 was 95 00 change to EA NOP 
Additional code needed in page 17 is: 

17DA 6C 00 00 JMP (0000) 

17DD 4C 00 00 JMP 0000 

17E0 B5 00 MOVIT LDA(X) 00 

17E2 95 00 STA(X) 00 

17E4 4C 15 34 JMP 3415 
The address overwriting now occurs in page 17 RAM 
instead of in the main code, which can now be safely 
put into PROM. 

Before doing so, however, we must relocate it. 
Note that relocation should not alter existing page 
boundaries (see warning on p. 44 of FOCAL 65-E 
Manual). This actually makes the job easier, because 
only the high-order bytes of addresses and address- 
words can be changed. Relocation then is accom- 
plished by (a) adding the desired offset to the 
third byte of all three-byte instructions which do not 
reference page zero; (b) Offsetting the data words for 
routines such as PUSHJ and POPJ, the software 
stack manipulators. These words are scattered here 
and there through all the code. A listing of their 
high-order halves is given in Table 1 ; they are 
address words, so only the second byte is to be offset, 
(c) Offsetting the high-order bytes of the address 
tables at the end of the FOCAL code, which are at 
hex Iocs. 34FA-3515, 3546-3557, 356A-356E, 
3598-359C, 35A2-35A6, 35AC-35B0, 35B6-35BA, 
35C0-35C4, and 35CA-35CE. (d) Adding the offset 
to the IRQ- vector initialization byte at loc. 
34AE (I date your cleverest relocation program to 
find that one!). 

A final change necessary to execute FOCAL 
from PROM is to change the RAM allocation for 
program statements and variables so it is located 
in RAM, instead at the end of the machine code 
to go in PROM. The original start of this allocation 
is at loc. 35F3, but if you are going to PROM 
your FOCAL I suggest you save some PROM loca- 
tions by deleting the heading that is printed as if it 
were line number 00.00 by the Write command. I 
retained only the line number zero and a carriage 
return in my version, since the program expects to 
print something there. This saves twenty-seven 
bytes of memory. In my system, I decided to start 
the RAM storage for statements and data at loc. 
4000, so initialization there is as follows: 
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4000 00 ;line number 

4001 00 ;of 00.00 

4002 OD ;ASCII 'CR' 

4003 FE ;PBEG 

4004 FF ;VEND 
To tell FOCAL where to put its statements and 
variables, some page zero locations need to be 
changed: 

002F was D4 35 change to 00 40 ;beginning of RAM allocation 
0031 was F2 35 change to 03 40 ;start of user's text 
003 E was F3 35 change to 04 40 ; start of variable list 
0040 was F3 35 change to 04 40 ;start of variables for "erase all" 
0042 was F3 35 change to 04 40 ;end of variable list 

The code to accomplish page zero and page 17 setup 
and initialize the user RAM is given in Table 3. The 
code begins at loc. 3677 instead of right after the 
FOCAL code because I have some other modifica- 
tions in between; the user will want to relocate this 
to suit his system anyhow. 

Table 1. Table of High-Order 

Data Bytes Used by 

POPJ and PUSHJ. Add 

Offset to Relocate. Table 2. FOCAL Initialization 



'See 6502 User Notes, issue #16, and errata in issue #17. 
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2A45 


2B 


2A5D 


29 


2ABE 


29 


2B97 


29 


2EFF 


29 


2F7F 


29 


2FA3 


29 


2FE8 


29 


300D 


2B 


309E 


29 


316A 


2B 


3186 


29 


31A8 


21 


34AE 


2C 



3677 



3690 



369D 
36A0 



375C 
375D 



A2 00 

BD AO 36 

95 20 

E8 

E0 BD 

DO F6 

A2 00 

BD 5D 37 

9D DA 17 

E8 

E0 0D 

DO F5 

A2 00 

BD 6A 37 

9D 00 40 

E8 

E0 05 

DO F5 

4C 00 20 

contents 
> FOCAL lo 
[$00DC go 

6C 00 00 
4C 00 00 
B5 00 
95 00 
4C 15 



COLDST 
L00P1 



L00P2 



LOOP 3 




LDX $00 
LDA(X) TABL1 
STA(X) 
INX 

CPX $BD 
BNE L00P1 
LDX $00 
LDA(X) TABL2 
STA(X) $17DA 
INX 

CPX $0D 
BNE L00P2 
LDX $00 
LDA(X) TABL3 
STA(X) $4000 
INX 

CPX $05 
BNE LOOP 3 
JMP FOCAL 

TABL1 



TABL2 



34 



367A 



367E 



00 
00 
0D 
FE 
FF 



TABL3 



;Initialize table & instructions 
;at page zero 



initialize $17BA-$17E6 for 
;removal of self-modifying code 
;in FOCAL 



;Initialize User RAM 
;with line number 
;zero and data bytes 



;Go to FOCAL cold start 
;page zero constants & code 



;Table for patches to 
jremove self-modifying 
;code in FOCAL 



Line no. 
of 00.00 
ASCII 'CR' 
PBEG 
VEND 



© 



COS MAC 

QUICKIES Jess Hillman 

Quick, inexpensive solutions to control problems are 
always desirable, so owners of COSMAC Elf micro- 
computers may find many interesting ways to use the 
"quickie" programs in listings one, two and three 
accompanying this article. 

The programs were written specifically for my 
Quest Super Elf, which has 4.25K RAM, but they 
should run with very little tweaking on any 
1802-based system, if entered beginning at any 
quarter-K page boundry. 

Listing one is an interval timing program that 
can be set for any delay from a couple of seconds to 
about ten minutes by varying only the data byte in 
location 0011. By changing the program beginning at 
location 0015 to read: "9F FB XX (any value from 
00 to FF) CE 30 05 7B 30 00" the program can set 
intervals up to two days (actually the maximum 
value for Register F falls a few minutes short of 48 
hours). The data bytes in locations 0011 and 17 set 
the final value selected. Since the 1802 has plenty of 
registers for such usage, it would be very easy to 
establish intervals months long. 

The program specifically uses Register E, one of 
the 1802's sixteen, sixteen-bit general purpose 
registers, as a timer that continually counts down 
from hex FFFF. When Register E reaches zero, a 
fact discovered by testing both high and low bytes, 
Register F is incremented by one. The F register is 
then tested to see if the predetermined value has 
been set. If not, the timing loop continues. 

Once the proper value for F has been reached, 
the 1802 sets its Q line, an external flag that can be 
set or reset depending on various internal conditions 
of the processor, to a logic "1." After thus 
acknowledging it has reached the required time, the 
Q line is reset to logic zero and the timer resumes its 
labors. The Q line transition can be latched by con- 
necting it to an integrated circuit such as the 
74LS175 or the CMOS 4016, and held for use in 
driving a transistor, opto-isolator or relay (for high- 
voltage uses) to operate a coffee pot, television, 
stereo-practically anything controllable with an elec- 
tronic switch. 

Newcomers to the 1802 be warned: when tying 
to the Q line always buffer it generously with an IC 
like the 4050 or 4049, either of which can drive two 
TTL loads. Otherwise, you risk ruining your 
microprocessing chip. 

A variation of this use of the Q line is found in 
listing two, in which the operator wishing access to 
the Q line must first enter three predetermined, two- 
hex-digit numbers into memory in the proper se- 
quence. That oughta keep Pop's pet project safe from 
the kids! 



As the data bytes for the "combination" are 
entered into memory, the 1802 performs a logical ex- 
clusive or with each byte in turn, using data stored 
at addresses 000D, 0017 and 0021 respectively. If the 
wrong number is entered at any point, the program 
jumps to the error subroutine beginning at location 
0030, which momentarily outputs an "EE" to the 
data display (I have seven-segment LEDs) while ex- 
ecuting a three-second timing delay, then outputs a 
"00" to the data display and jumps back to the 
beginning of the program. 

In listing two, once the proper number sequence 
has been entered, the Q line goes high and stays that 
way until the input key is pressed and released (or 
external data flag EF4 is otherwise pulled low). Once 
EF4 goes low and returns to its normal state, Q goes 
to logic zero and the program loops back to the 
beginning again. 

As written, you would have to enter 05 (at 0D), 
17 (at 17) and 98 (at 21) to turn the Qline from 
logic low to logic high. You can change the data 
bytes for any combination you wish. The chances of 
someone solving the combination decrease if you add 
more numbers to the combination. 

Listing three changes this program to utilize an 
output port and eight data bits to control various 
devices. When entered as listed and run, the pro- 
gram will: require you to enter the three number 
combination properly, after which the Q line goes 
high (on my system this turns on an LED); then you 
must enter a status byte which will be put in the 
memory stack and also latched into the output port 
(1802 output instructions are 6N, where N designates 
a port from one to seven). I use a 63 instruction 
because that port is readily available on my ElFs ex- 
pansion board. Once the status byte has been latched 
to the output port, the program loops back to the 
beginning of memory and starts again. 

The status byte can be whatever you want it to 
be, depending on your interface configuration. Eight 
data lines are immediately available, so using tran- 
sistors, relays or a combination of techniques can 
give you immediate computer control of the major 
energy consuming devices in your home-air condi- 
tioning, hot water heater, and so on. 

By expanding the interval timer to include a 
lookup table of status bytes for dispatch to the output 
port at various times of the day, automatic control 
your home's major functions becomes possible. The 
only question you must answer is how elaborate you 
want it to be. 

Using the upper four bits of the status tied to, 
say, a 74LS154 four-to-sixteen line decoder, with the 
lower four bits or-tied to sixteen latches like the 
74LS175, it would be possible to control up to sixty- 
four devices from your micro's output port. 

Possible expansions and combinations of these 
programs arc virtually endless. As quickie programs 
go, however, they should give newcomers to the 
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1802, or people struggling with a system they've had 
for a time, a feel for register manipulation and con- 



trol application possibilities of the typical COSMAC 
system. 



Listing 1— Address 


Data 


Mnemonics 


Interval Timer 0000 


F8 00 


LDI00 


02 


AF BF 


PLO, PHI 


04 


7A 


REQ 


05 


2E 


DEC R.2 


06 


9ECE 


GHI, LSZ 


(18 


30 05 


BR 05 


0A 


8ECE 


GEO, LSZ 


OC 


30 05 


BR 05 


0E 


IF 


INC Reg. F 


OF 


8F 


GLO R.F 


10 


FB 17 


XRI 17 


12 


CE 


LSZ 


13 


30 05 


BR 05 


15 


7B 


SEQ 


16 


30 00 


BR 00 


17 


00 


IDL 


Listing 2— Address 


Data 


Mnemonics 


Combination 0000 


F8 00 


I.DI 00 


Lock 02 


B4 


PHI 


03 


F8 F0 


LDI FG 


05 


A4 


PLO 


06 


E4 


SEX 


07 


3F07 


BN4 07 


09 


37 09 


B4 09 


0B 


6C 


INP4 


OC 


FB 05 


XRI 05 


0E 


CE 


LSZ 


OF 


30 30 


BR 30 


11 


3F 11 


BN4 


13 


37 13 


B4 


15 


6C 


INP4 


16 


FB 17 


XRI 17 


18 


CE 


LSZ 


19 


30 30 


BR 30 


IB 


3F IB 


BN4 


ID 


37 ID 


B4 


IF 


6C 


INP 4 


20 


FB98 


XRI 98 


22 


CE 


LSZ 


23 


30 30 


BR 30 


25 


7B 


SEQ 


26 


3F26 


BN4 


28 


37 28 


B4 


2A 


7A 


REQ 


2B 


30 00 


BR 00 


30 


F8 EE 


LDI EE 


32 


54 


STR 


33 


64 


OUT 4 


34 


BF 


PHI Reg. F 


35 


2F 


DEC Reg. F 


36 


9F 


GHI 


37 


CE 


LSZ 


38 


30 35 


BR 35 


3A 


F8 00 


LDI 00 


3C 


54 


STR 


3D 


64 


OUT 4 


3E 


30 00 


BR 00 


Listing 3— Address 


Data 


Mnemonics 


Controlling 002A 


6C 


INP 4 


multiple devices 2B 


54 


STR 


2C 


63 


OUT 3 


2D 


7A 


REQ 


2E 


30 00 


BR 00 



Comments 

Initialize Reg. F for 

use as workspace 

Make sure Q is at logic "0" 

Decrement timer 

Check timer, long skip if zero 

If not zero, continue loop 

If high byte zero, check low byte 

If not zero, continue loop 

If low byte zero, increment workspace register by one 

Get new value from Register 

Exclusive Or with predetermined value 

If values match, long skip (PC incremented by 2) 

If no match, continue loop 

Set Q line at logic "1" 

Then start looping again 

End 



Comments 

Set up workspace in memory 
using Reg. 4 to point to 
stack beginning at 
address 00F0 

Loop if EF4 equals zero 

Loop if EF4 equals one 

Get keyboard byte 

Check if correct combination # 

Long skip if zero (a match!) 

Else go to error subroutine 

Wait until next byte latched 

in from keyboard 

get the byte 

If it matches, too, then long skip 

Go To error subroutine otherwise 

If second number matches, wait 

for last combination number 

Get it 

See if it, too, matches 

Long skip if it does 

Error subroutine if it doesn't 

All numbers OK, Q equals "1" 

Keep Qline on until input 

key pressed and released 

Then turn it off and go back 

to beginning 

Error subroutine 

Load message "EE" 

store it in stack, then 

output to LED display port 

Also store in Register F 

Reg. F decremented by one 

Check byte in Reg. F 

Skip next two bytes if zero 

Otherwise loop 

Load "00" and output to 

clear error message from 

display 

Go back and try again 



Comments 

Get the byte input after correct combination given 

Put status byte in stack 

Output status byte to device interface 

Turn Q off 

Then go back to start 



® 
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The 1802 
Instruction Set 

Dann McCreary 

Box 16435 

San Diego, CA 92116 

In case you missed our first column, we took a flight 
of fancy over the 1802 to survey it's architecture. 
With this installment we begin a leisurely look at the 
1802s' instruction set. Where possible, we'll try to 
compare and contrast 1802 instructions with similar- 
instructions on the 6502. 

Before we get rolling, here's an interesting bit of 
news I got from a certain OEM user of the RCA 
1802. They have been delivering 1802 based systems 
which run at a clock rate of 3.2 MHZ. The systems 
were designed well within RCA's specs for the 1802. 
They are real-time systems and much of the software 
developed for them depends on that clock rate. Well, 
it seems that RCA has since had second thoughts 
about their 1802 speed spec. They've notified their 
customers that the 1802 is now only useable at up lo 
2.5 MHZ. Not nice! If any other 1802 users out 
there feel like victims of the "sting", I'd like to hear 
about it. 

Do you remember the 1802s' I and N registers? 
A large number of 1802 instructions can be readily 
understood by breaking them down into their I and 
N components. Generally speaking, the contents of I 
determine the operation to take place, while the con- 
tents of N designate the general purpose 16 bit 
register to be used or affected. Look at the illustra- 
tion of the instruction matrix. Each unbroken 
horizontal area represents an instruction of this type. 
Even the LDN instruction in the first row is like this 
except that it is not applicable to R0, since the 00 
hex op-code has been preempted for use as the IDL 
instruction. 

Let's take for example a 1C hex. The 1 in the I 
register says that this is an increment instruction and 
the C in the N register says that it is to affect RC, 
one of the 16 bit registers. You could change this to 
affect any register merely by changing the N portion 
of the op-code. (By the way, this kind of consistency 
across the board makes the 1802 one of the easiest 
processors to hand assemble code for.) INC performs 
a true 16 bit increment with rollover such that FFFF 
hex increments to 0000 hex. It is very much like the 
6502s' INX and INY instructions except that X and 
Y are only 8 bit registers. One caution: since the 
1802 has no status register, the only way to branch 
on the result of an INC is to test the register contents 
by moving them in to the 1802 accumulator, register 
D. Also note that the 6502 INC lets you increment 
memory contents but the 1802 INC is strictly for 
registers. These comments apply as well to the DEC 



instruction, 2N hex (where N represents any hex 
digit), but in the opposite direction. 

On the 6502 you can load the accumulator 
(LDA) from memory using a variety of addressing 
modes. The 1802 gives you LDN (ON hex) which lets 
you load D with the contents of a memory location, 
and LDA (Load Advance, 4N hex) which is a LDN 
and an INC rolled into one. But which memory loca- 
tion does the data come from? The contents of the 
register designated by RN go out on the address bus, 
selecting a memory location. Right there, my friend, 
is what can be one of the more frustrating aspects of 
programming an 1802 - the only way to access 
memory is via a register. This implies doing some 
LDIs (Load Immediates, identical in function to the 
6502 Immediate Mode) to set up a memory address. 
Compare these: 

6502 
AD 3412 LDA ADDR1 .. READ MEMORY 

1802 
F8 12 LDI A.l (ADDR1) .. SET UP 
B8 PHI R8 .. R8 TO POINT TO 
F8 34 LDI A.O (ADDR1) .. THE DESIRED 
AQ8 PI.O R8 .. MEMORY ADDRESS 
08 LDN R8 .. READ MEMORY 

Looks pretty bad for the 1802, right? 
Well, consider that every time you want to load or 
store at that memory location with a 6502 it's going 
to take 3 BYTES. On the 1802, once you've set up 
the address you can load or store (STR) with only 
one BYTE. The 1802 LDA instruction also gives you 
16 bit auto-indexing memory access with a one 
BYTE instruction! To do this on the 6502 you would 
have to set up two page zero memory locations with 
the starting address and then do a double-precision 
increment between each memory access. I'll let you 
figure out how many BYTES that would take you! 

In our example we also used PHI and PLO. 
These instructions transfer the contents of the ac- 
cumulator, D, to the high or low order BYTE of the 
register designated by N (RN). The converses of 
PHI and PLO are GHI and GLO. GHI transfers the 
most significant BYTE of RN to D. GLO transfers 
the least significant BYTE of RN to D. 

The last two instructions that operate consistent- 
ly across the board are SEP and SEX. SEP simply 
takes the contents of N and places them in the P 
register. You may recall that the 4 bit P register 
determines which 16 bit register is the current pro- 
gram counter. At system reset, P is forced to zero, 
making R0 the initial program counter. After in- 
itializing some registers, a program might execute a 
SEP instruction as a simple means of transferring to 
a subroutine. Let's consider a subroutine with the 
simple task of toggling the Q flip-flop from its pre- 
sent state to the opposite state. We'll assume that our 
main program is using R0 as program counter and 
that the subroutine will be at 1 101 hex. Before we 
can use the subroutine, we must put its' starting ad- 
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dress into a register like this: 

F8 11 LDI A.l(QSUB) .. MSB OF ADDRESS 
B7PHI R7 .. INTO R7.1 
F8 01 LDI A.O(QSUB) .. LSB of ADDRESS 
A7 PLO R7 .. INTO R7.0 

The . 1 and .0 notations indicate HI and LO order por- 
tions of a register or 16 bit address. Now we can ex- 
ecute this: 

D7 SEP R7 .. GO TO QSUB 

When the SEP R7 is executed, R0 is left pointing at the 
instruction immediately following the SEP R7. So can 
you guess what dur return from subroutine instruction 
will be? Right, a SEP R0! Here's QSUB: 

1100 
1101 

DO QRET: SEP RO .. RETURN TO MAIN PROGRAM 
CD QSUB: LSQ .. IF Q IS SET, SKIP 2 BYTES 
7BSEQ.. SETQ 
38 NBR .. SKIP A BYTE 
7AREQ.. RESET Q_ 
30 00 BR QRET .. GO RETURN 

Why is the return at the top? After executing QSUB 
and branching to QRET, the last thing the 
subroutine does is execute the SEP R0. As that is ex- 
ecuted, R7 is incremented and now points once 
again to QSUB, ready for the next subroutine call. 
Please note that only programs using R0 as their 
program counter may call this subroutine. Incidently, 
we used some new instructions here - SEQ and REQ 
which are considered control type instructions and 
some branch and skip instructions. The branch in- 
structions are the unconditional branch, BR, and the 
unconditional branch not, NBR. Unlike the 6502 
which provides relative branching, the 1802 only per- 
mits absolute branching. Its short branches are much 
like a 6502 IMP instruction, only the high-order ad- 
dress is whatever is currently in the program 
counter. Thus you can only do a short branch within 
the memory page you are already on. Also, when 
you relocate code in memory, most of the branch ad- 
dresses must be changed - quite tedious if you are 
assembling the code by hand. The 1802 does allow 
unconditional short branches, something that sure 
would be nice to have on the 6502. The NBR in- 
struction is interesting because it effectively results in 
a skip and in fact you may wish to use the mnemonic- 
skip rather than NBR. Conditional branches are 
possible based on the state of Q or DF and also on 
the zero/non-zero state of D. This includes both short 
and long branches. The long branches are like the 
jump on the 6502 but if you are assembling by hand, 
beware! All 16 bit addresses on the 1802 are specified 
in normal order, not reversed as on the 6502. Condi- 
tional short branches are also possible based on the 
state of the external flag lines, EFI-EF4. As an exer- 
cise, try writing a subroutine that returns a number 
from 1 to 4 in D, based on which one of four exter- 
nal flag lines is activated. Use the instructions Bl, 
B2, B3, and B4 to branch on the state of the flags. 



1802 INSTRUCTION 
MATRIX 

N 






1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D EF 






i 

D 

L 


LOAD VIA RN (LDN) 


1 


INCREMENT RN (INC) 


2 


DECREMENT RN (DEC) 


3 


BRANCH 
ON Q. Z. DF 


BRANCH 
O.N EFI-EF4 


BRANCH NOT 
ON Q. Z. DF 


BRANCH NOT 
ON EF2-EF4 


4 


LOAD-ADVANCE RN (LDA) 


5 


STORE VIA RN (STR) 


6 


i 

R 
X 


OUTPUT 


X 


INPUT 


7 


CONTROL (t 
MEMORY III, 


ARITHMETIC 
W/CARRY 


CONTROL 


ARITH. 

IMMEDIATE 

W/CARRY 


8 


GET LOW BYTE OF RN (GLO) 


9 


GET HIGH BYTE OF RN (GHI) 


A 


SET LOW BYTE OF RN (PLO) 


B 


SET HIGH BYTE OF RN (PHI) 


C 


LONG 
BRANCH 


N 
O 

r 


LONG 
SKIP 


LONG 
BRANCH 


LONG 
SKIP 


D 


SET P REGISTER (SEP) 


E 


SET X REGISTER (SEX) 


F 


I.OCIC 


ARITHMETIC 


LOGIC 

IMMEDIATE 


ARITHMETIC 

IMMEDIATE 



The LSQ in our example is typical of the Long 
Skip isntructions. If the condition of the skip is met, 
the next two bytes are skipped. Otherwise, execution 
continues with the next instruction. Long Skip condi- 
tions are the same as for Long Branches, with the 
addition of LSIE which permits testing the state of 
the interrupt enable flag, IE. 

Finally, we come to the instruction we've all 
been waiting for- SEX! Obviously the designers at 
RCA are not your staid, single-minded, no-nonsense 
engineering types at all. They appear to enjoy mix- 
ing a little fun in with their work! Setting X, from 
which the infamous mnemonic is derived, simply 
puts the value of N into the X register. A number of 
the instructions we have yet to look at interact with 
the memory location pointed to by the 16 bit register 
designated by X. We'll refer to that register as RX. 
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LDX is like LDN. It loads the contents of 
memory pointed to by RX into D. LDXA is to LDA 
as LDX is to LDN. STXD is like a STR, but in- 
stead of storing D via RN, it stores D at the location 
pointed to by RX and decrements RX to boot. Now 
if they had only included a load via X and decre- 
ment, and a store via X and advance (LDXD & 
STXA) the 1802 would have been much more ver- 
satile! Oh, well. So much for memory reference via 
RX. 

The 1802 gives you a handful of arithmetic 
operations that let you subtract or add the contents 
of memory and D. Unlike the 6502, the 1802 gives 
you the option of excluding the carry (DF) from the 
operation. Thus, you can add without first clearing 
the carry and subtract without first setting the carry. 
Arithmetic can also be done using the immediate 
byte, allowing you to add or subtract fixed values. 

The logical operators used VIA RX are AND, 
OR and XOR (Exclusive OR). They work much like 
their 6502 counterparts. They may also be used in 
immediate mode. D may be operated on also with 
the SHR, SHRC, SHL and SHLC. These are iden- 
tical to the 6502 LSR, ROR, ASL and ROL com- 
mands, in that order except that they apply only to 
shifting the accumulator. 

Input and output instructions are also intimately 



While Th«y Last I 

Blank b<wd for D=M EPROM 
PROGRAMMER, ohly $!}> corn- 
plele u/*T¥\ soTTLuare and over 10 
pa.aes or do Cu*\ *wTaTion! Ivogr-awf, 
V/erifies, copies, Z708, TMS27/6, 
27/6 , 2732 ,-jc . Use cwitt KM, SYM, 

a/m,pe:t; *fc. w«eds 1-4 f>oAs. 

EE-I Emo\«i*s EPROM -for 
Spe-cdy li fty-J u/ar* and SOTTcuare 

dev/elop^e*-f. Sew<! S.fl.S.ITUart 

Tor Oui cU. '\H~T or n« *."\ \ o/\ . 

NIAGARA yiCRO DESIGN, INC. 
1700 NIAGARA ST. BUFFALO, N.Y. 14207, 716-873-7317 



related to RX. To output a byte of data, you must 
first store it at the memory location pointed to by 
RX. RX is also incremented when the OUT is ex- 
ecuted, making this handy for outputting messages 
from buffers. Using INP inputs a byte into D, but be 
careful! It also gets stored VIA RX. Be sure RX is 
pointing where you want it. When doing an Input or 
Output, the N lines on the 1802 chip are set to 
match bits 0, 1 and 2 of the contents of the N 
register. This makes I/O decoding in hardware 
somewhat simpler than the 6502 memory-mapped 
only approach. 

IRX increments the X register. It is really a 
vestigial out instruction but no output is defined 
when N = 0. Note also that what might have been 
an INP (68 HEX) is the one undefined 1802 op- 
code. It is now used on the recently released 1804 to 
add some features and correct some 1802 deficien- 



cies. 



Well, we've looked over all but a handful of the 
1802's 255 instructions. All that are left are some 
control instructions with some relatively obscure or 
involved applications. We'll discuss them in later col- 
umns as we apply them. Meanwhile, try converting 
some 6502 code into 1802 code for practice. And let 
me hear some comments! I can be reached at Box 
16435, San Diego, CA 92116. © 




BIORHYTHMS $12.95 

SLOT MACHINE $ 9.95 

BLACKJACK $ 9.95 
OTHERS 

S.A.S.E. for information. Will work on 
any 1802 system with terminal and 4K 
memory. Written in machine language 
by L. Sandlin. 

ELF II cassette and listing. Texas 
Residents add 6% Sa. Tx. 

SANSOFT PLUS 
PO BOX 58170 
Drawer 900 
Houston, Texas 
77058 
C.O.D. after 6PM (713) 488-7905 
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CAPUTE! 

Our Bug- Box 

Robert Lock 

Here, at long last, are the corrections to Read Pet 
Tapes With Your Aim that appeared in the March/ 
April issue (#3) of COMPUTE. 



LINE * LOG 



CODE 



LINE 



'LI. 0212 00 



'6 



0043 


0214 


20 


89 


03 


0044 


0217 


A2 







0045 


0219 


BD 


6F 


04 


46 


021 C 


C9 


20 




0047 


02 IE 


FO 


06 




0048 


0220 


20 


7A 


E9 


'19 


0223 


E8 






050 


022-} 


DO 


E3 




051 


0226 


20 


3E 


E8 


053 


0229 


18 






0054 


022 A 


AD 


6D 


04 


055 


022D 


69 


62 




056 


022F 


8D 


6D 


04 


057 


0232 


AD 


6E 


04 


0058 


0235 


69 







0059 


0237 


20 


46 


EA 


060 


023 A 


AD 


6D 


04 


061 


02 3D 


20 


46 


EA 
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J LOOK FOR BLANK AT END 
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i FOR F'ROGRAM 
JaDD TO END 
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i REMOVE IF USING 
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Note to you PET Owners who read COMPUTE. 
Don't use the Disk ID Changer program in Issue 5 un- 
til you see the important update in Issue 6. RCL 
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compute II. 



August /September, 198Q. Issue 3. 



Oops! 

And here's an important correction for Marvin L. 
Dejong's compute II, Issue 2 schematic. (Page 6, 
Some A/D And D/A Conversion Techniques. Note 
that pins 10 and 12 (circled) are now (correctly) 
reversed. 




Q + 5V 



Figure 1. Complete analog-to-digital and digitatl^-analog conj^rlcr circuit. 




6502 FORTH 

» 6502 FORTH is a complete programming system which 

contains an interpreter/compiler as well as an 
assembler and editor. 

» 6502 FORTH runs on a KIM-1 with a serial terminal. 

(Terminal should be at least 64 chr. wide) 

» All terminal I/O is funnelled through a jump table near 

the beginning of the software and can easily be 
changed to jump to user written I/O drivers. 

• 6502 FORTH uses cassette for the system mass storage 

device 

• Cassette read/write routines are built in (includes 

Hypertape). 

• 92 op-words are built into the standard vocabulary. 

• Excellent machine language interface. 

• 6502 FORTH as user extensible. 

• 6502 FORTH is a true implementation of forth according 

to the criteria set down by the forth interest 
group. 

• Specialized vocabularies can be developed for specific 

applications. 

• 6502 FORTH resides in 8K of RAM starting at $2000 and 

can operate with as little as 4K of additional 
contiguous RAM. 



6502 FORTH PRICE LIST 

KIM CASSETTE, USER MANUAL, AND 
COMPLETE ANNOTATED SOURCE 
LISTING $90.00 

($2000 VERSION) PLUSS&H 4.00 

USER MANUAL (CREDITABLE 
TOWARDS SOFTWARE 
PURCHASE) $15.00 

PLUS S&H 1.50 

SEND A S.A.S.E. FOR A FORTH 
BIBLIOGRAPHY AND A COM- 
PLETE LIST OF 6502 SOFTWARE, 
EPROM FIRMWARE (FOR KIM, 
SUPERKIM, AIM, SYM, and 
APPLE) AND 6502 DESIGN 
CONSULTING SERVICES 
AVAILABLE 

Eric Rehnke 

1067 Jadestone Lane 

Corona, CA 97120 



Now Available For KIM, AIM, And SYM 
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Introducing Memory-Mate*, the AIM-65 expansion 
board that lets you spend your time on application 
solutions, not hardware hassles. Add Memory-Mate 
to your AIM-65 and make quick work of development 
and process control projects. 

In its primary function, the Memory-Mate board pro- 
vides 16-48K of RAM expansion assignable in 4K 
blocks anywhere in the system. Memory-Mate's pari- 
ty check circuitry insures system RAM integrity (in- 
cluding AIM's 4K on-board RAM) for high reliability 
applications. The programmable write protect feature 
eases software development chores. This compact 
board, which fits directly beneath the AIM, also in- 
cludes four programmable I/O ports, a tone 
generator for audible warnings, and sockets for 4K of 
PROM. 




I/O intensive applications are accommodated with 
Memory-Mate's STD BUS interface option. Use off- 
the-shelf STD BUS cards to solve your biggest I/O 
problems. 

The Memory-Mate with 16K RAM is priced at $475, 
with 1 6K expansion chip sets (including parity chip) 
costing $100 each. With 48-hour active burn-in and 
warranty for a full year, you won't have to worry 
about reliability either. 

First of the complete AIM-Mate* series, Memory- 
Mate will be joined shortly by the Video-Mate*, 
Floppy-Mate* and the AIM-Mate case. For further in- 
formation on the entire AIM-Mate series, write 
'Attn: AIM-Mate Series' at the address below. 

*TM Forethought Products 









Forethought Products 

87070 Dukhobar Rd., Eugene, OR 97402 
(503)485-8575 
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Low Cost Graphics 
Are Now Here 



Add Printabl 
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To Yoiir AIML-6S Microcomputer 



Visible Memory Board It's a reality. The Visible 
Memory and graphic: print software from MTU are now 
available for the Rockwell AIM -65. The Visible Memory 
gives a high resolution 320 wide by 200 high bit mapped 
pixel display matrix. Each dot is individually addressable 
for maximum utilization and speed. Thus characters, image 
shapes, and graphs can all be displayed separately or 
simultaneously if needed — maximum flexibility for you. 

The Visible Memory is just that, an 8K byte RAM board 
that contains 2 access ports to the memory matrix. The 
microprocessor bus uses one port and the display refresh 
circuitry uses the second port. The contents of the memory 
bit-for-bit is precisely what is displayed. If you need 8K of 
RAM for a non-display application, use it! It makes no dif- 
ference to the board what its contents are; program (seen 
in its binary pattern form) or a human recognizable display- 
pattern. The display refresh occurs at times when the pro- 
cessor never goes to memory. Therefore there is no snow on 
the display and no wait states for the processor. 

Hardcopy Too In addition MTU has engineered a software 
package to drive the AIM-65 printer in new ways. Three 
new forms of printing are possible. QUICKPRINT gives a 
matrix 200 across by 320 up the 2 V4 " wide paper. 
QUALITYPRINT gives two prints, each 100 x 320 which 
gives a higher quality (4Vt" wide) printed area when placed 
side by side. TEXTPRINT allows you to print the AIM text 
buffer area of memory as 10 rows of characters printed "up" 
the paper strip. You may specify up 
to 127 characters per row for the 
row length. The QUICK and 
QUALITY print modes are designed 
to give you fast, easy hardcopy of 
the Visible Memory contents. Thus 
you now have a graphic computer 
with hardcopy capability. 



Graphic/ Text Software Drivers To allow you to easily 
use this graphic display and print power. MTU has also 
designed the K-1008-5C software package which gives you 
point plotting, line drawing, character generation and a 
host of other subroutines. Written in assembly language, 
these routines may be executed from BASIC or assembly- 
language — your choice. Text output from BASIC or the 
AIM monitor may also be shown on the Visible Memory 
display as up to 22 lines by 53 characters per line signifi- 
cantly enhacing the use of the AIM-65 as a computer with 
a CRT display. 

Call lis Now Many educators have been waiting for this 
type of price/performance to set up courses. MTU will be 
pleased to quote quantity purchases — call us direct — , 
now. Demand is high and Fall is just around the corner. 
K- 1008 Visible Memory $240 

K- 1008-5C Graphic/ text software $25 

K- 1009-1C AIM Print software $25 

K-1000-5 AIM-65 Power Supply $65 

K- 1005-A AIM-65 Card File $85 

Many others not listed 
Call or write for our catalog listing all our AIM-65 (also 
our PET, KIM-1, and SYM-1) products. 

As of June 1, 1980 place orders at: Micro Technology 
Unlimited, P.O. Box 12106, 2806 Hillsborough Street, 
Raleigh, North Carolina 27605 





> Technology Unlimited 
P.O. Box 12106 
2806 Hillsborough Street 
Raleigh, N.C. 27605 
(919) 833-1458 



